Top 10k strings from ZX-Review 1995.04 (1995)(Inforkom)(ru).fdi
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [FDI] (TOSEC-v2006-06-06) /
Back to the directory listing
228 96 54 - 45 39 C 34 33 C 28 0 26 25 0 24 . 22 C 22 0 21 20 19 . 18 0 18 . 18 . 17 . 17 . 17 15 . 15 . 14 . 14 . 14 . 13 1 12 UUUUUUUUUUUUUUUUUUU 12 0 11 . 11 . 11 . 11 . 11 . 10 ;****************** 10 . 10 . 10 . 10 ; 9 ;******************* 9 0 9 . 9 9 9 8 0 8 0 8 . 8 8 7 : 7 0 7 0 7 . 7 . 7 , 6 : 6 0 6 . 6 ********************************* 6 6 6 5 : 5 : 5 0 5 0 5 0 5 0 5 ). 5 ********************************* 5 T R - D O S 5 * * * 5 4 perewod9~isel9iz9 4 : 4 : 4 : 4 208,208,208,208 4 11,11,11,11 4 1* * * 4 1 4 0 4 0 4 . 4 - ********************************* 4 - * * * 4 ). 4 Scorpion' 4 OUT (C),A ; 4 4 4 3 UUUUUUUUUUU 3 FFFFFFFFFFFFFFFFFFFF 3 ? 3 ? 3 ;********************** 3 ; 3 : 3 : 3 : 3 : 3 : 3 : 3 : 3 0 3 0 3 0 3 0 3 . 3 . 3 . 3 "). 3 "" "" 3 snapshot- 3 Spectrum' 3 "Restore" 3 TR-DOS 3 ; 3 PUSH HL 3 LD A,H 3 - 3 3 3 3 2 ~astx9fajla9 2 zapisatx9sektor 2 zapisatx9dorovku 2 s~itatx9dorovku 2 stro~n=9bukwy 2 sistemnoj9dorovke 2 sektorow>> 2 podtwerdite9 2 perezapisatx 2 p@p@p@p@p@p@p@p 2 nowye_dorovka 2 najti9fajl 2 hhhhhhhhhhho` 2 g$="Step": 2 g$="Cursor": 2 _zamena9diska 2 _wwod9komand 2 _wozwrat9w9 2 _stranica9wpered 2 _stranica9nazad 2 _perekl`~enie9zagl= 2 _perekl`~enie9revimow9 2 _informaciq 2 ^islo9NE9bolx{e 2 Zapustitx9fajl 2 Zapisatx9izmeneniq 2 Zapisatx9dorovku 2 Zapisatx99sektor 2 Wyjti9iz9procedury 2 Wy9uwereny9 2 Wstawxte99prinima`}ij9dis 2 Wstawxte99kopiruemyj99dis 2 S~itatx99dorovku 2 Swobodno>>>>> 2 Stertyh>>>>>>>> 2 Steretx9mark 2 S=_Peterburg 2 Perwaq9swobodnaq9dorovka>> 2 Pereme}enie9kursora_klawi{ami9kursora 2 Pereimenowat 2 POCMOTP KAPTOTEK 2 Ob?em9fajla9iz 2 O9[9I9B9K9 2 Nowaq9mask 2 Nesankcionirowannaq99kopi 2 Ne9TOT9disk99 2 Na~alo_dor= 2 Na9diske9NET9takogo9fajla 2 Mnogo9sektoro 2 Mnogo9fajlo 2 Mark=9fajlow 2 Kopirowatx9s9 2 Kontrolx9diskow9 2 Konec9_dor= 2 Fajlow>>>>>>>>> 2 Fajlow>>>>> 2 Fajl99su}estwuet 2 Dlina9999fajla>> 2 Disk-Doctor 2 CONVER Comander 2 Adres9zagruzki>> 2 @=Kowalewskij 2 ? 2 ? 2 ;-------------------- 2 ;************************ 2 ;*********************** 2 ;***************** 2 ;"sprAjtoB" 2 ;"formAtE rEdAktorA" 2 ; 2 ; 2 ; 2 ; 2 : 2 : 2 : 2 : 2 : 2 9zapisatx99katalog 2 9stertyh>>> 2 9prerwatx9operaci 2 9ignorirowatx9fajl 2 9Konec9programmy9 2 9@=Kowalewskij 2 999swobodnoj9zone 2 2REBEL PLANET 2 2QUEST FOR MINDSTONE 2 2Magic Operational System 2 2ANDY CAPP 2 2ADVENTURELAND 2 256128 48: 2 22,12,8,148,149 2 22,11,8,146,147 2 22,10,8,17,2,16,7 2 0 2 0 2 0 2 0 2 0 2 0 2 0 2 .11 00000000 2 ., 2 . 2 . 2 . 2 . 2 - 3. 2 - POP HL 2 - LD (#5CFF),A 2 ,22528+256 2 ,16384+2048 2 ,," 3A 2 , CALL DOS 2 , 2 ++++++++++ 2 *REFLECTION 2 ); 2 ); 2 ). 2 ). 2 ). 2 ). 2 ). 2 ). 2 ) 2 'True Vid.' 2 'Inv. Vid.' 2 'Graphics' 2 'Caps Losk' 2 #"a\"c\"e\! 2 "S\"K\"U\#"Y\ 2 ". 2 ". 2 ". 2 """""""""""""""""""" 2 TR-DOS. 2 Spectrum-128 2 Spectrum-128 2 Scorpi- 2 STS2.6, 2 PRINTQ. 2 POLE ATTR 2 KEMPSTON- 2 CHIGGERS' 2 (EXAMINE 2 (0-255), 2 MS-DOS 2 M : LOAD N$CODE 16384 2 ITES: ";HMS 2 HEX'e), 2 ES: ";CADR-ADR 2 ? ";N$: RANDOMIZE USR 15619: REM 2 : SAVE N$CODE ADR,(CADR-ADR) 2 59 LD A,E 2 7 L2 LD A,(HL) 2 11 ADD HL,BC 2 Original idea........50% 2 Coding...............50% 2 RET NZ 2 AND 7 2 PUSH DE 2 LD (#5D00),HL 2 RET ; 2 OUT (C),A ; 2 LD BC,#FFFD ; 2 LD BC,#BFFD ; 2 ; ( 2 - 93 - 2 2 1 }e smotrite (i slu{ae 1 ||xxttppllhhdd`` 1 |ksta klassaq 1 |<<D8xDDDDD< 1 zywa` dalx}e: w |tom izwra{ 1 zy=zy+y(s): 1 zx=zx+x(s): 1 za malym - k 1 zApisAtx sprAjty" 1 zApisAtx fAjl B" 1 zAgruzitx fAjl B" 1 zAdAniE oknA. pri udEr-" 1 yy=yx-zy*w(n): 1 yxvVe#&@%A 1 yx=y-zy*y(v0): 1 yx=y-zy*(y(v0)+y(u8)): 1 yx=(a2*n+s*a3)*n+a1: 1 yx=(a1*n-s*a3)*n+a2 1 yr=(yy-y)* 1 y=yx-y(u9) 1 y=k+y-y(u9): 1 y+b<(yp-py+b)*d 1 y*Gj"bj:Zj2dj:[j2ej 1 xy=x+zx*x(v0): 1 xy=x+zx*(x(v0)+x(u8)): 1 xx=xy+zx*v(n): 1 xx=xx+k*i: 1 xx=xx+(n=u8): 1 xr=(xx-x)* 1 xco txmy ', qwlq`}u` 1 x=xy+x(u9): 1 x=j+x+x(u9): 1 x= y= D 1 x+(xp-px+b)*c>w3 1 x(t)+a7-b: 1 x$=g$+",y": 1 x$=g$+",x": 1 x$=g$+",r": 1 x$=g$+",l": 1 x$="no. of pixels": 1 x$="no. of chars": 1 x$="new attr": 1 x$="change": 1 x$="Vert. Radius": 1 x$="Turn Angle": 1 x$="Start Angle": 1 x$="Space": 1 x$="Rotation": 1 x$="Radius": 1 x$="Pic No.": 1 x$="Pic Mode (p,a,c or d)": 1 x$="No. to save": 1 x$="Mark": 1 x$="Horiz. Radius": 1 x$="Arc Angle": 1 ww=yx*a1-xy*a3: 1 ww=-i*r-j: 1 ww-a1/u8+j: 1 written in TASM, ofcoz). 1 wgfVUDDDCDDTUffvw 1 w1+" saved": 1 w1+" is the wrong type": 1 w$(z)=" ": 1 w$(a)=" ": 1 w |tojpr@r 1 vv=xy*a2-yx*a3: 1 vLOOKBOOTB 1 v9,u6;k$(en): 1 v8,v1;bx;","; 1 v4,u5;k$(ed); 1 v4,n0;q$(b+ 1 v3,w0;q$(u9+k); 1 v3,v8;"r,l =";r;",";l; 1 v3,s;"I P B F "; 1 v3,n0;k$(s- 1 v2,v0;"COLOUR"; 1 v2,u6;x;",";y; 1 v1,v3;"0. Main Menu": 1 v1+s*i,v3;i;". Load ";l$(i): 1 v0,v5;"SAVE"; 1 v0,v5;"LOAD": 1 v0,m4;j$(p*p1+b); 1 v(n),w(n): 1 ustAnoBkA zAdErvki" 1 ustAnoBkA proiz-" 1 ustAnoBkA poslEdo-" 1 ustAnoBkA fonA" 1 udAlitx sprAjt" 1 u&u2u"u4ypi| 1 tut nedawno poqwilasx odna 1 t,v3;"1. ";a$; 1 t,u6;ss;",";tt; 1 stErEtx sprAjt" 1 sswodk.txC 1 slEduqwij sprAjt" 1 skroll kuda- 1 screen window 1 s,m4;j$(p*p1+b); 1 rolling sprAjtA" 1 rolling oknA" 1 rEvim rEdAKtorA" 1 rAbotA s sprAjtom" 1 rAbotA s oknAmi" 1 rAbotA s fAjlAmi" 1 r=r-x(v2)* 1 r r r6r&x:r8r r`rfr 1 qsa`}aq. o 1 q10.tx C 1 q zakolebal 1 q wse e{e demiurg ASH i wy0 1 proisXodit" 1 programmistP# 1 problema w tom,! 1 priwetstwu 1 primEhAnia:": 1 prEdyduwij sprAjt" 1 pppppppppp 1 pozwonitx psihiat 1 pokAzAtx sprAjt s mAskoj" 1 pokAz sprAjtA" 1 pod uglom ply 1 pe^atlenie ^to ot 1 pNpNp`p`prprpJ 1 p0p0q(p@q8 1 p,a,c or d 1 p*p3p<pH@Q 1 p*p0p<pHpN 1 p(p(pPp(pPpPpxpPpxpxp 1 p$p,p8p@@L 1 p p(p8p@pHpPp`phpppxp 1 p (0xp5p=pMpUp] e 1 ottuda ws` skanirowannu` IBM' 1 otrAvEniE OknA" 1 otrAvEniE Bokrug gori-" 1 otmEnA izmEnEnij" 1 osnoBnoE mEnq": 1 okonhAniE" 1 o2]j2^j2aj2`j<2 1 o,m3;y;" " 1 o,a;j$(p*p1+b);" ";x;" "; 1 o rEdAktorE" 1 nyE punkty poslE zAdAnia oknA" 1 nameless*Gj 1 nameless 1 na SPACE#% 1 n=s*a1+s*a3+m: 1 n0,v8;"step=";aa;",";bb; 1 n0,v3;"2. ";: 1 n+b,v5;x(n); 1 n+b,v5;x(n): 1 n+b,v5;d$; 1 n+b,u5;y(n): 1 n+b,m3;e$; 1 my tAkvE movEm sdElAtx dla BAs " 1 mulxtiplikAcia" 1 mjgda^[XUROMJGDA?<9742/-+(&$" 1 migAniE (Bkl/Bykl)" 1 majka kalinina, to 1 m4+"0123": 1 m3,v6;n;","; 1 m3,v6;"colour": 1 m3,v3;"3. ";b$ 1 m3,n0;q$(v0+ 1 m+" characters": 1 m 'LORD OF THE RINGS' BY TOLKIEN. knig 1 lu~}e ih. VA 1 lenxkaq, ~umuru 1 left rightup down whole 1 l=x(t)+a7-b: 1 l=x(t)+a7-b 1 l=o(s*z+r+u8+ 1 l,r,u or d 1 kopiroBAniE sprAjtA" 1 kopiroBAniE OknA" 1 klABiwi uprABlEnia" 1 kAtAlog diskA" 1 k=d*d/c/c-b: 1 k+xx+yy+xy+c+yx+h+oc+d+i+j+m+l=n: 1 izmEnEniE rEvimA" 1 ispolxzowanP1 1 iniciAlizAcia" 1 iniciAlizAcia movEt proizBoditx-" 1 informaciq dl 1 inBErsia sprAjtA" 1 inBErsia oknA" 1 imq kotoroj 1 i$=g$+" ": 1 i$="Please try and save it again": 1 i$="Please try again": 1 i$="Please rewind the tape to verify": 1 i$="Maximum "+ 1 i$="Invert 1 i$="Do you wish to overwrite ( 1 h$=h$+","+u$(n+b): 1 h$=h$+" ("+ 1 h$=c$+" has not been verified": 1 h$="window/screen 1 h$="print string": 1 h$="filename": 1 h$="Store is being used for "+l$(m): 1 h$="Enter "+h$: 1 h$="Currently": 1 h$="Completed": 1 graphics software 1 grafiku i muzy 1 goworim o muzyke0B 1 g09.tx C 1 g$=g$+l$(n): 1 g$="block size": 1 g$="Swap Colour": 1 g$="Set Print": 1 g$="Set Colour": 1 g$="Set "+g$: 1 g$="Scroll" 1 g$="Scroll Attr": 1 g$="Save " 1 g$="Reverse": 1 g$="Print block": 1 g$="Pic No.": 1 g$="Pic Mode": 1 g$="Merge": 1 g$="Mark/Space": 1 g$="Magcopy": 1 g$="Load ": 1 g$="Last Plot": 1 g$="Ellipse": 1 g$="Delete ": 1 g$="Cover": 1 g$="Coords. "+ 1 g$="Circle": 1 g$="Change Colour": 1 g$="Brush": 1 fReimport ZX AS 1 eras=eras-1 1 eras=eras-(a$(i,1 1 eras=eras+(a$(i,1 1 ee, A SAM teper 1 ece on kru 1 demiurg ASH 1 d=yp-py+b: 1 d08.tx C 1 d.16 kw.73%q 1 cBEt hErnil" 1 cBEt fonA" 1 c>(w3-x)/t 1 c=xp-px+b: 1 boot BU(U() 1 blagodar`Q 1 b,n0;"mode:";j$(p+b); 1 b,a;d$;d$;d$: 1 b*&]"-a!/a"&]> 1 b$=b$+"n)" 1 arkostx (Bkl/Bykl)" 1 a=a+s*(k-1 1 a3=vv*ww*k: 1 a2=ww*ww*k+b: 1 a1=vv*vv*k+b: 1 a,v6;j$(p+b); 1 a,a;" ";d$;d$; 1 a$=s$(s)+t$(n): 1 a$=g$+" too thin": 1 a$=a$+" too big": 1 a$=a$+" stored": 1 a$=a$+" copied": 1 a$=a$+" "+ 1 a$="top right" 1 a$="no room" 1 a$="lower left": 1 a$="copy "+s$(s): 1 a$="01234": 1 a$="0123"+ 1 a$(x)=a$(y): 1 a$(x)=a$(y) 1 a teperx q budu goworitx bez 1 ``ddhhllppttxx|| 1 _AAAAAAAAAA 1 ^07-3.tx C 1 X07-2.tx C 1 X OR CS+X=DIR SHOW 1 WOULD ONLY 1 WINDOW MENU": 1 WINDIoW.... 1 WDO YOU REALLY 1 WANT TO QUIT? 1 W AND R WORKS WITH CURRENT 1 VIEW......... 1 V 3.02R 512K 1 V 3.02R 128K 1 TOP (wpro~em esli ubra 1 TO VELSOFT AND JMS!_H 1 THE S P R I T E M E N T 1 THE FUCKINGSA 1 THANKS TA/ 1 TEN BY ME, 1 TAPE ERROR 1 T","K-KOCM L- 1 Size Y :000 1 Size X :000 1 Set values 1 Set device 1 Scale Inc. 1 Sam 10.96 $ 1 SURE DELETE? 1 STUDIO COMPILER 1 SS+W <> - 1 SS+Q <= - 1 SS+I - 1 SS+Enter - 1 SS+E >= - 1 SPRITEMENT 4.3 BY VAG 04.07.93 FILE: T: S: A: (V)IEW(X)CAT(B)ACK(N)EW(SSF)EDIT(W)RITE(R)EAD(S)AVE(L)OAD(12)<-> 1 SPRITE..... 1 SPRITE MENU": 1 SPRITE EDITOR v2.1 1 SPRITE EDITOR V2.1 1 SM'a. WARNING!! 1 SET VALUES 1 SET DEVICE.. 1 SET DELAY.... 1 SAVE FILE: 1 SAVE FILE... 1 SAVE DATA... 1 SA software productions : 1 S.T.PRO 1996 COMPILATION OF SANDMAN BY DEMIURG 1 S & MUSIC W 1 Rotation = 1 Rot. Inc. = 1 Reset 1 to 8 1 Reset 0 to 9 1 RESTORES THE DISK 1 RD + 1 QWERTPOIUYASDFG 1 QUIT....... 1 QUEST FOR MINDSTONE, 1 QAOPSPC/KEMPSTON 1 QAOP,SP ili kEMPSTON 1 Q07-1.tx C 1 Press no. of option 1 Picture ElementsUDGs Screen g 1 Picture no.= 1 P\=]Z(boot BU(U() 1 PROGRAMMED DRAW PARAMETERS 1 PRINTADD COMM DIFF 1 PRINT DECIMAL 1 PRESS ANY KEY": 1 PRESS A KEY 1 POBKA -4": 1 PIDERGROUP), 1 PARTS OF SPRITEMENT: 1 PAMM B KAPTOTEKE ";n: 1 [email protected] 1 OhistkA OknA": 1 Official distributer 1 OVERWRITE ? 1 OTHOCTb n/216d. n=";q: 1 OOM-METAL GROUP. YOU MU 1 OHOK(OT 3 1 OFF ON TO FROM UNSETSET 1 OF SCREEN (UPPER 16 LINES). 1 O HOMEPA?";N1 1 O CTPOK B CTPAH 1 Normal order 1 NORMAL ORDER. 1 NO GRAPHICS 1 NENTER TO RETURN 1 Master Assembler v1.0 for 128k Speccy only! 1 MagOS 1 MUSIC-MACKER! 1 MOVE SPEEDS : 1 MNB!@#$%_)('& 1 MAY SEE EXCEPTIONAL EFFECT. 1 MAX IWAMOs! 1 M$="3563568568:68:;8:;8:68563525" 1 LOAD FILE... 1 LISTEN IT. 1 LINE:0000 COL:00 F:L TEXT:0000/FFFF BUF:0000/4000 FILE:........ 1 LEONARDO error trap. 1 L AND S WORK WITH FILES. 1 Initialize 1 IS IMPOSSIBLE 1 IS IMPOSSIBLE 1 IORQ. 1 INSERT DISK 1 INITIALIZE. 1 INITIALIZE mENU": 1 INITIALIZE 1 IN HIS PART 1 I LOVE MY DU 1 HTEP -6" : 1 HCIAQK!=9N;"( 1 HAVE BEEN PROTECT 1 GOLDEN DISK 1 GGGGGGGGGGFF 1 GGGGFFFFFF 1 GENTLEMENq 1 Figure table 1 FUCK YOUDOIN' HERE, SHITMAN? 1 FILE....... 1 FILE MENU": 1 FILE ABSENT 1 FIGURE TABLE 1 FFFFFFFFFF 1 Esli zAintErEsoBAlisx,to zBonitE" 1 Edit sprite:000 Quantity:000 1 Edit order 1 EXECUTE...... 1 ENTER continue : SPACE abort 1 ENTER FILE NAME : 1 END ZONE, 1 EDIT ORDER... 1 E -2" 1 Draw table 1 Deznya by Dyad 1 DISKEDMAX IWAMOTO 1 DISK HEAD POSITION. 1 DISK ABSENT 1 DISK ERROR 1 DEMIURGE ASH 1 DELAY(1-15): 1 DEFW - DW; DEFS - DS. 1 DDD<D|D@pDD 1 D=92@up3@3 1 D<D<DDDDD<< 1 D8H8<8H8DDD 1 D-distchor 1 Created by 1 Coords. to 1 CURSOR PLOT UNPLOT INVERT PICTUREMAGCOPYFIGURE COLOUR PRINT COLCOPYMAGCOPY 1 CS+L & CS+S SAVES/LOADS TWO PART 1 CS+9 GRAPH - 1 CS+8 ===> - 1 CS+7 || - 1 CS+6 \/ - 1 CS+5 <=== - 1 CS+4 I.VIDEO - 1 CS+3 T.VIDEO - 1 CS+2 C.LOCK - 1 CS+1 EIDT - 1 CS+0 DELETE - 1 CREDITS : 1 CREATED BY FDI" 1 CKA -8": 1 CKA -9" 1 CK HOMEP ";h$: 1 CK -7": 1 CATALOGUE... 1 C07-0.tx C 1 C 1 Bybor nAkopitEla" 1 BstABitx sprAjt" 1 Brush mode= 1 Background 1 BDDDD@DDHDD 1 BACKGROUND... 1 B8x<D8x8D<< 1 B mEnq rAbotAET kAk 1 AUTHOR MR.VAG THANKS FOR USING 1 ATb?(0-HET)" 1 ANIMATION.. 1 ANIMATION MENU": 1 ANDY CAPP, 1 AND PRESS A KEY 1 AND LEFT<->RIGHT MOVING. 1 ABOUT...... 1 A B-ABTO","C-C 1 ?) 1 ?" 1 ?!) DELIRIUM MULTIDEM@p 1 ? / Yes,No /";: 1 ? BATON) 1 ? TIME ( 1 ? (CUT VINE WITH KNIFE). 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 > TO LITE-KUBE ( 1 > FROM - 1 <x8888D8DDDDDDD>~< 1 <T<xTDDDD><<< 1 <T8xTrDDDDDDDDDDD< 1 <NONE> 1 <B|T|DDDD8 1 <<DDD<<xx(8| 1 <<D8xDDDDDDDDDD<< 1 <#20=32, 1 ;j$(bd+s,b): 1 ;================ 1 ;=============== 1 ;--------------- 1 ;******************** 1 ;* bit 0- Save 1=Yes 1 ;* BIG FONT (Ballbr.2) * 1 ;* #3D13 EMMULATION 1 ;"~PROGRAMS BANK~ v9.4"; 1 ;"zontAlxnoj ili BErti-" 1 ;"tElxnosti prokrutki" 1 ;"kursorom nA linzE i B mEnq" 1 ;"kAlxnoj osi" 1 ;"izmEnEniE rAzmEroB oknA" 1 ;"INSERT PAPER 1 ;"File ~bank~ not found": 1 ;"CURSOR"; 1 ;"CORRECTED BY"; 1 ;"C 19-00 do 21-00" 1 ;"BOlxnoj poslEdoBA-" 1 ;"BCTABbTE 1 ;"BAtElxnoj prokrutki" 1 ;"(mAskA/sprAjt)" 1 ;"(Bykl/poln/wAXm)" 1 ; SZ=DX*DY*8 - 9 LD HL,(#5C0B) 1 ; Psy (Physhe) - 1 ; Mind spirit - 1 ; O) MORE... - 1 ; 1) VIEW WEEKS FIXTURES; 1 ; VERTED. ( 1 ; NEXT MATCH. 1 ; 3) SAVE DATA; 1 ; 2) VIEW DIVISION 1 TABLE - 1 ; 1) VIEW WEEKS FIXTURES - 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 :djT_:ej=G 1 :SPRITE EDITOR v2.1 1 :HZH[H\H?^%]V 1 : ZX-Hacker v 2.3 1 : Super Sound v 2.2 1 : Solomon's Key 2 1 : OUT (#FD),A 1 : Multiplex 1 : LD BC,32765. RANDOMIZE USR 39000: POKE 39057, 1 : LAGASH, RIVERS OF DEAD, THREE 1 : FEDCBA9876543210 1 : Eric & the Floaters 1 : DEF FN L (X,Y,L,H,A,O) = 1 : DEF FN B(X,Y,N,O) 1 : Alternative. 2) VIEW FIXTURES; 1 : 621 LET IX=999 1 : 121019, 1 : 05.1995. 1 : 000rspag11111101 1 : "Neme- / Q, A, O, P). 1 : Str (Strengh) - 1 : SPRITE OUTPUT 3 1 : SOME SOOT, SNAIL'S SHELL, 1 : POKE 64908,80: 1 : LET A$=SCREEN$ 14 ADD HL,BC 1 : KEMPSTON, SINC- 1 : EAST, NORTH, EXIT). 1 : Dendy, SEGA, SEGA-Megadrive-2, SEGA-CD, Nintendo, Su- 1 : DEF FN M (X,Y,L,H,O) = OUTPUT 1 1 : DEF FN O (X,Y,N,O) = USR 51 PUSH DE 1 : "THROW FUNGUS AT SLUG", 1 : "Out of memory". 1 : DEFB - DB; 1 : ADD HL,HL 1 : ET O=2: GO SUB 15: RETURN 1 : (C) 1 : 32 LD A,#3C 1 : 17 SRL A 1 : 1 ; BLOCK OUTPUT 1 : 42 DJNZ L5 1 : - 1 : RET ; 1 : T) CHECK TEAM STATISTICS; 1 : 3) 1 : - 1 : 16 CALL K1 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 9{~2gz#~2u 1 9is a professional 1 98,64,50,0 1 93. 1 9,5,4,2,2,1,0,0 1 88DT8x8xDDDDD< 1 81,81,144,0 1 8, PASS INC D 1 8). 1 7!?l"%!`=9 1 67,64,127,0 1 64,128,0,0 1 58,10,178,0 1 5544322100/..-,, 1 506.tx C 1 5 CHANGING ALGORITHM OF MOVEMENT 1 46000;2300 1 4- DosVer 1=5.03 * 1 33,33,17,17,8 1 32,21,0,#FF 1 32,159,160,161,#FF 1 3.znAhEnia pEriodA ABtopoBtorA i" 1 3.VIEWER V 1 3.SS+LEFT/RIGHT 1 3. Load graphics 1 3"Scorpion ZS-256" 1 3 1 2ZX-FORUM 3 1 2WITCH CAULDRON 1 2UND TRACKER 1 2TRACK KEEPER 1 2TR-DOS #5CC2-#5CC4 1 2TEMPLE OF TERROR 1 2STALINGRAD 1 2SPECTROFON 1 2SOUND TRACKER MUSIC STE- 1 2SOUND TRACKER 1 2SORCERER OF CLAYMORGUE CAST- 1 2SIM CITY. 1 2SHORT CIRCUIT 1 2SHADOWS OF MORDOR 1 2SEAS OF BLOOD 1 2SAGE FROM ANDROMEDA 1 2ROCK STAR ATE MY 1 2RECOMPILER 1 2REBEL STAR 1 (MOONBASE 1 2RALD ISLE 1 2OPERATON NIGHT 1 2OF MORDOR 1 2MULTIPLAYER SOCKER MANAGER. 1 2LOSES HIS CLOCK 1 2LORD OF THE RINGS PART 1 1 2LORD OF THE RINGS, PART 2. 1 2LAST NINJA 2 1 2LASER BASIC 1 2LASER GENIUS 1 2KNIGHTMA- 1 2KNIGHT TIME 1 2KING ARTUR'S QUEST 1 2HUMAN TORCH 1 2HIP QUEST - 1 1 2HER EARTH 1 2HAMPSTEAD 1 2GRANGE HILL 1 2GLADIATOR 1 2FOUR MINUTES FOR MIDNIGHT 1 2FALL OF ROME 1 2FAIRLIGHT 1 2ENTERPRISE 1 2DUN DARACH 1 2DEFENDERS OF THE CROWN 1 2DANGER MO- 1 2CRIME BUSTERS. 1 2CAPTAIN KELLY 1 2ARTSTUDIO, 1 2AFTERSHOCK 1 2AFRICA GARDENS 1 255,255,192,223 1 255,0,255,255 1 254,2,194,250 1 252,2,130,132 1 251,3,255,255 1 223,192,255,255 1 22,7,13,16,1,17,7 1 22,20,1,16,6,17,0 1 213,85,88,0 1 204,168,166,0 1 201,81,145,0 1 2.FIRE+UP/DOWN 1 2.EDITOR SS+FIRE 1 2.10.95. 1 2. Save graphics 1 2- ErCod 1=ReOnly* 1 2(Adventure Games) 1 2" T R I C K S " 1 2 1 1ZX-Spectrum. 1 1KEMPSTON- 1 1FINE KEYS. 1 1996 KOVROV CITY 1 1993 MOSCOW": 1 194,2,254,0 1 170,170,146,0 1 17,33,163,0 1 162,163,164,#FF 1 154,155,156,157 1 150,151,152,153 1 148,21,1,16,1,17,0 1 147,21,1,16,1,17,0 1 144,160,32,64 1 144,144,80,0 1 132,136,136,16 1 127,64,67,95 1 1234509876qwertpoiuyasdfg 1 1.kopiroBAniE sprAjtA B mAsku" 1 1.UP/DOWN 1 1.PICTURE OUT 1 1. Create graphics 1 1- First char 1 1"boot". 1 1 AND 2 MOVE SPRITE <> 1 0: 1 0: 1 034 1 033 1 025 (F.O.R.C.E.Ltd), 1 024 1 023 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0,2,165,81 1 0,192,164,170 1 0,144,80,89 1 0,128,27,42 1 0,128,213,153 1 0,11,9,145 1 0,1,149,89 1 0,0,18,171 1 0, 300012, 1 0). 54 POP HL 1 0). 36 CALL DOS 1 0 PCX\zx-4-95.pcx , +16^ 1 0 PCX\printer.pcx , +4^ 1 0 PCX\mouse.pcx , +8^ 1 0 PCX\kirill3.pcx -6^ , +8^ 1 0 PCX\kirill2.pcx , +8^ 1 0 PCX\kirill1.pcx 1 0 PCX\forum.pcx +5^, +2^ 1 0 PCX\etude.pcx +2^, +12^ 1 0 PCX\crossr.pcx , +18^ 1 0 PCX\bodrov.pcx -8^ 1 0 PCX\art2.pcx -8^, +20^ 1 0 PCX\art1.pcx -8^ 1 0 LOOP LD A,(HL) ; 1 0 DOS RST#20. 1 0 CURSOR 1 0 C378: 7B C3 C9 00 00 00 00 00 :42 1 0 C360: 67 59 3E 10 32 93 C3 3E :F7 1 0 C358: C3 3E 08 CD 7B C3 DD 21 :2D 1 0 C350: DD 21 47 59 3E 20 32 93 :D4 1 0 23296 = #5B00 = 01011 1 0 #C9 - 1 0 32 1 0 PUSH HL PUSH HL 1 0 POP HL POP HL 1 0 LD L,C POP BC 1 0 LD H,B PUSH HL 1 0 LD C,L POP BC 1 0 LD B,H PUSH HL 1 0 L1 LD A,#2E 1 0 6. 1 0 5. 1 0 4. 1 0 35 SBC HL,DE 1 0 34 CCF 1 0 31 JR NC,L1 1 0 28 DJNZ L3 1 0 27 L3 HALT 1 0 25 JR NZ,L2 1 0 24 BIT 3,H 1 0 23 DEC DE 1 0 21 LD (HL),A 1 0 20 AND C 1 0 19 L2 LD A,(DE) 1 0 18 LD DE,BUFF+6911 1 0 17 L1 LD HL,23295 1 0 16 LD C,0 1 0 15 LDIR 1 0 14 LD BC,#1800 1 0 13 LD DE,#4000 1 0 13 JR Z,L2 1 0 12 LD HL,BUFF 1 0 12 AND 4 1 0 11 LDIR 1 0 11 LD A,H 1 0 10 LD BC,#02FF 1 0 10 INC HL 1 0 9 LD (HL),A 1 0 8 AND C 1 0 7 LD D,H 1 0 6 LD (HL),L 1 0 5 LD HL,#5800 1 0 4 ENT $ 1 0 3 ORG 50000 1 0 2 PAUSE EQU 5 1 0 1 BUFF EQU 51000 1 0 - 1 0 RET NZ ; 1 0 LD HL,TABL; 1 0 LD D,A ; 1 0 LD D,0 ; 1 0 LD B,5 ; 1 0 INC HL ; 1 0 IN A,(31) ; 1 0 AND 31 ; 1 0 7. 1 0 IN A,(254); 1 0 TASM 1 0 RET 1 0 30 RL C 1 0 29 CCF 1 0 POP AF 1 0 22 DEC HL 1 0 RRA 1 0 23551 = #5BFF = 01011 1 0 ... 1 0 LD C,A 1 0 C368: 09 CD 7B C3 DD 21 87 59 :1D 1 0 36 LD (SEED),HL 1 0 29 DEFB #CB 1 0 26 LD B,PAUSE 1 0 POP HL 1 0 8 LD E,L 1 0 AND (HL) ; 1 0 66 1 0 ADD HL,BC 1 0 93 1 0 54 1 0 43 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 .9, LD E,0 1 .58). 1 .37-38. 1 .3. 1 .27. 1 .27). 3 LD IX,#4000 1 .26-29). 1 .2. 1 .111 11111111 1 .11 11111111 1 .1. 1 .1 00.txt 1 .010 11111111 1 .000 00000000 1 .00 00000000 1 .........700 1 ..................64 1 ..................10 1 ...................9000 1 .....................1023 1 .................................... 1 ............... 1 ............ 1 ...) 1 ...". LD C,127 ; 1 ... ( 1 ... 1 ... 1 ... 1 ... 1 .": NEXT i: RETURN: REM UDG 1 . poslE zAprAwiBA-" 1 . ostAlx-" 1 . 524-16-53, 248-47-69. 1 . 43-31-09 1 . 20). DJNZ LOOP_1 1 . 14-00-73. 1 . MagOS 1 . (CRYSTAL 1 . OK), 1 . 52,0,16,59,255,222,220,0,0,0,0,0 1 . L3 CP #20 1 . 9. 1 . 8. 1 . LD A,0 ; 1 . 9 ; C = 6 - 1 . 4 ; 1 . 1) 1 . SHALLOWS OF GOTH 1 . RET ; 1 . 6 LD A,#FF 1 . 11 DEC D 1 . 48 1 . 14 1 . " 1 . NEXT n 1 . DROP SPELL (V) - 1 . To continue the game. 1 . (SWITCH FLASHLIGHT ON) 1 . C370: 2B 06 01 10 FE 7C B5 20 :C4 1 . LD R,A 1 . ADD HL,HL 1 . - 1 . CALL 1 . OR C 1 . INC HL 1 . 31 INC HL 1 . 21 PUSH BC 1 . MID) 1 . 13 LD BC,#0008 1 . ********************************* 1 . LD H,A 1 . ********************************* 1 . 7 ORG 64692 1 . 0,0,124,254,255,0,0,0,0,0,0,0,0, 1 . O) MORE... 1 . 56 AND #18 1 . 12 LD D,(HL) 1 . WAGES - 1 . 19 ADD HL,BC 1 . LOTTERY - 1 . 55 AND 7 1 . 4) LOAD DATA - 1 . 26 L2 PUSH BC 1 . (0-9) 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 -uprABlEniE" 1 -PLANKTON-. 1 -95, N3, 1 -95, N3, 1 -95, N1, 1 -95, N2, DJNZ L1 1 -94, N4, 1 -94, N6, 1 -94, N6) 1 -94, N5. 1 -94 N3, N6), 1 -93, N1-2, 1 -37. 1 ------------------------------------------- 1 -(2 3HAKA)";h$: 1 - on", 1 - WEAR TIE) 1 - USR 65278. 1 - UP), 1 - TOM). 1 - TOKEN. 1 - TING), 1 - TELESTONE 1 - Spectrofon' 1 - Sound Master, TASM , ARTSTUDIO 1 - SPRITE INPUT 1/2. 1 - SEYE) 1 - ROM); 1 - ROM). 1 - PLANK) - 1 - OF GOTH, SHURRUPAK. 1 - MONEY). 1 - MENTS) 1 - MENT EXCHANGE 1 - LOOK. 1 - KNIGHT WITH SWORD). 1 - KING, 1 - KEMPSTON 1 - JECT AMPOLE TO MAN). 1 - HL,(FFFF), POP HL 1 - HL, DE 1 - HDOWN; 1 - HAMMER) 1 - GO ASSHORE. 1 - FN...). 1 - DEAD) 1 - DD56, DD63 1 - CAR), 1 - C368: FE C9 76 3A 7F C3 D3 FE :B5 1 - BG & SI-SOFT 1 - BASIC" 1 - BARREL). 1 - BARREL) 1 - AY-3-8910, 1 - 65535 1 - 2,7,10,15 1 - 128". 1 - 128 ( 1 - .PTOR, 1 - (WRINKLES), 1 - (TAKE MONEY). 1 - (Satisfaction Megademo 1 - (SCREWDRIVER) 1 - (Microgen Joystick), 1 - (GAUNTLET). 1 - (EXAMINE BIKE) 1 - (CROSS BORDER), 1 - (CROSS BORDER) 1 - #7FFD (32765) 1 - #5CC2 1 - A$="" THEN GO TO 20 1 - 5,147,0,0,0,0,0,0,0,0,3,3,3,7,55 1 - 28,0,0,0,7,1,0,7,15,15,7,1,248,2 1 - 0,248,252,254,242,0,0,0,0,0,0,0, 1 - 0,0,7,7,15,15,15,7,7,7,235,227,2 1 - 0,0,128,128 1 - ,247,247,243,017,85,17,255,255,1 1 - ,241,254,223,239,247,0,0,0,128,1 1 - ,17,255,255,125,131,0,128,140,15 1 - ,0,0,176,252,246,246,0,0,0,0,0,0 1 - ,0,0,0 1 - MERGE "STS2.6" 1 - 1;;"0-MODE ENTER-PUT S 1 - TAKE SPELL (B) - 1 - OUT VAL "32765" ... 1 - O) MORE... 1 - L3 PUSH BC 1 - GATE RECEIPTS - 1 - EXIT - 1 - EXIT POP HL 1 - D) DISMISS TALENT SCOUT; 1 - CALL SPELL (C) - 1 - BEGIN LD HL,#4000 1 - ACTION - 1 - 6. 1 - 53 POP DE 1 - 52 POP BC 1 - 51 M3 CALL DOS 1 - 5. 1 - 49 JR NZ,M3 1 - 46 PUSH BC 1 - 45 PUSH DE 1 - 44 M2 PUSH HL 1 - 43 LD (#5D00),HL 1 - 4. 1 - 38 POP DE 1 - 37 POP BC 1 - 37 AND 7 1 - 34 LD A,#2C 1 - 33 JR NC,L2 1 - 30 RRA 1 - 30 LD (HL),A 1 - 3) SAVE DATA - 1 - 29 NUM LD A,(IX+0) 1 - 29 OR A 1 - 28 LD A,D 1 - 28 LD (NUM+2),A 1 - 27 PUSH BC 1 - 26 L1 PUSH DE 1 - 25 LD B,8 1 - 25 CALL DOS 1 - 24 L1 PUSH BC 1 - 20 PAUSE 1: LET A$=INKEY$: IF 1 - 20 LET l=23295 1 - 20 PUSH DE 1 - 2) VIEW DIVISION 1 TABLE; 1 - 19 PUSH BC 1 - 19 LD BC,(#5D00) 1 - 18 LD DE,(#5CFE) 1 - 18 LD B,8 1 - 18 LD A,(HL) 1 - 17 PUSH BC 1 - 17 LD HL,(#5C00) 1 - 17 ADD HL,BC 1 - 14 JR NZ,M1 1 - 14 ADD HL,BC 1 - 12 GO TO 10 1 - 12 LD D,(HL) 1 - 12 ENT $ 1 - 11. 1 - 10 LD BC,#0004 1 - 1. Hazel's assistant, 1 - 1. 1 - "HOW MUCH WILL YOU GIVE FOR 1 - LD IX,#2A53 ; 1 - LD C,31 ; 1 - CALL #3D13 ; 1 - 9 LD HL,(#5C0B) 1 - 8 ENT $ 1 - 7 ; B = 1 - 7 ORG 64912 1 - 6 ; DE = 1 - 54 PLOT LD A,D 1 - 53 PUSH AF 1 - 52 PUSH DE 1 - 50 PIXELS POP DE 1 - 5 ; HL = 1 - 49 INC IX 1 - 4 DATA 0,0,0,0,0,1,3,3,0,0,0, 1 - 3 ; SPECIAL FOR INFORCOM 1 - 2 DATA 1,1,0,0,0,0,124,254,25 1 - 15 ADD HL,BC 1 - 14 LD BC,#0008 1 - XOR D ;TABL. 1 - EXIT / ACTION / ATTACK 1 - 6 ; =USR 64692 1 - 5 ; DEF FN O(X,Y,N,O) 1 - 4 ; 1 - 2 ; V. BODROV (C) 1995 1 - 1 ; SPRITE OUTPUT 3 1 - OUT (C),A (BC=#7FFD) 1 - In the music, what do you 1 - XOR #07 1 - RES 5, (IY+1) 1 - RET C 1 - RES 7,A 1 - POP DE 1 - POP BC 1 - LD (#5C00),HL 1 - JR L3 1 - JR EXIT 1 - INC (HL) 1 - ADD A,8 1 - POP HL 1 - POP DE 1 - POP BC 1 - lines 1 - 1 - 1 - 1 ,v2;"Press no. of option": 1 ,u6;n;","; 1 ,buf+2048+245 1 ,buf+2048+227 1 ,,1:loader 1 ,," KATA 1 ,," CTAH 1 ,," COPT 1 ,#D8 ;5.03 1 ,#8E ;5.01 1 ," bright(0-1)",0 1 ," paper(0-7)",0 1 ," flash(0-1)",0 1 ,!,",#,$, 1 , S.S.CAPITAN ( 1 , PULL RING - 1 , GAME OVER. 1 , 99. 1 , 9 - 14. 1 , 24. 1 , 1995. ZX-SPECTRUM 48k. 1 , 1995. C380: ED 78 E6 0F 32 A4 C3 06 :3C 1 , 1995. RL D ; 1 , 1995. 2 ; SMALL DISK-DRIVER 1 , 1995. PUSH BC 1 , 1995. 1 , 1995. 1 , 1995. 1 , 1995. 1 , 1995. 1 , 146. 1 , 133. 1 , "GO S", 1 , iS-DOS 1 , DX*DY*8 - 1 , 0-159) 1 , "gam2" - 1 , TR-DOS; 1 , KEMPSTON- 1 , Icon control 1 , Font Editor): 1 , COMPUTER - 1 , C358: 6A C3 E1 11 0A 00 19 C1 :1E 1 , ********************************* 1 , (FLY) - 1 , (A, B, 1 , (l-n): POKE (l-n),0: LET k=k+1: 1 , USE (U) - 1 , LOOP PUSH HL 1 , L5 LD A,E 1 , 20 EXX 1 , CALL DOS ; 1 , 5 LET k=4E4: LET l=22527: LOA 1 , 13 ; 1 , EI 1 , C378: 7B C3 C9 01 FD FF ED 79 :A5 1 , * * * 1 , CP 255 ; 1 , 38 SEED DEFW 0 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 +Horizontal 1 +*))('&%%$#""! 1 +"W\#"S\"K\6 1 *bj:ejGO:dj 1 *START TAPE 1 *START TAPE 1 *SPRITE INSERTING 1 *SPRITE DELETING 1 *FILE EXISTS 1 *ANIMATION 1 ********************************": 1 ********************************" 1 ************************* ZX- 1 )Horizontal 1 )GMR Ltd. Garbuzov 1 )? TRACKER, 1 )? 1 );a$(a+l,15 1 );" ";a$(a+l,11 1 ); 1 ); 1 ): 1 ). TR-DOS 1 ). (NOTES). 1 ). HELP' 1 ). find? 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ), Sound Tracker, ASC 1 ), CURSOR, D 1 ) SerzhSoft'95 OR (HL) 1 ) Garbuzov Alex 1 (i*i+j*j): 1 (c) Garbuzov Alex MOCKBA 1992 1 (buf+2048+244), 1 (buf+2048+229), 1 (buf+2048+228), 1 (buf+2048+225), 1 (a-u,1-774) 1 (MasTer Debuger). 1 (EXTEND) osnoBnoE MEnq" 1 (965 bytes) * 1 (095) 490-14-26 1 (05.tx C 1 ((n-a)/k)+((n-a)/k 1 ((n-a)/k)) 1 'CONVER-Utility' & Y.Kovalevsky 1 '04.tx C 1 '+'P'+'Q'+'A'+Space+Enter). 1 ''" EXTEND MODE-B 1 #E0,#D8,#D8,#00 1 #C0,#D8,#70,#00 1 #BC,#B0,#1E,#00 1 #60,#60,#60,#00 1 #0C,#0C,#0C,#00 1 #01,#19,#0F,#00 1 #00,#3F,#0C,#0C 1 #00,#0F,#18,#0F 1 #00,#00,#D8,#D8 1 #00,#00,#70,#D8 1 #00,#00,#6C,#76 1 #00,#00,#1C,#32 1 #"a\"c\"e\>82 1 "spredit2" 1 "sa pri pomowi oknA 1 "qtsa mAskA,cBEt i kolihEstBo." 1 "posrEdstBEnnym zAdAniEm rAzmE-" 1 "drivprof" 1 "RESTORES THE" 1 "NO 128K MEMORY!": 1 "NAME",Y$: 1 "NAME",U$: 1 "KAPTOTEKA 1 "INSERT DISK" 1 "HAVE BEEN" 1 "Alex MOCKBA 1992" 1 "AND PRESS 1 "; DD37, DD40 1 "; 1 "; 1 ": 1 ": 1 "0)030!0,0" 8 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ","*-FX128 ", 1 ", 1 ", 1 "). 1 "). 1 "). 1 "(c) Garbuzov " 1 "(4!.cpopxp 1 """" """" 1 " READ ONLY !" 1 " PROTECT" 1 " PROGRAM" 1 " N1 1 " DISK ERROR!" 1 " 121019, 1 " NN 9...14. 1 " Ba- 1 " - 1. 1 " (EXAMINE ASH, TAKE 1 " ink(0-7)",0 1 " B KAPTOTEKE ";n;" 1 " 0,7,7,7,15,15,15,7,7,227,235,227 1 " HA 1 " ";G$;: 1 " 1 " 1 " 1 " 1 " 1 !LOAD FILE: 1 !03-3.tx C 1 ! RET). 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 ! 1 }p5p=pMpUp] eP 1 zAdEPvki pErEd ABtopoBtorom" 1 sic-128 ( 1 sar's palace". 1 s nadpisx`: zdelal simen 1 progrAmmy: 1 on ZS-256. 1 obra}ajtes 1 movno ustAnoBitx B 1 mal/Turbo ( 1 in3.PIX. 1 in3.PIX), 1 iS-DOS. 1280- 1 iS-DOS. 1 iS-DOS, 1 iS-DOS). 1 iS-DOS 1 dAET KombinAcia 1 ce Monitor 1 ZX-Spectrum? 1 ZX-Spectrum. 1 ZX-Spectrum" 1 ZX-SPECTRUM, 1 ZX-SPECTRUM 48k; 1 ZX-NEXT. 1 ZX-FORUM 2, 1 ZX-FORUM 1, 1 ZX*WORD. 1 ZX*WORD 1 ZX*WORD 1 ZX SPECTRUM: 1 ZX SPECTRUM: 1 ZX SPECTRUM c 1 Y-CTPAT","Z- 1 XOR). 1 WITH PISTOL). 1 WINDOW ATTR 1 WEST, SOUTH. 1 WARNING! 1 W-BOEH","G- 1 VISIPHONE, 1 VER CUTLESS. 1 VE PICTURE) 1 UTILITY ROOM. 1 USR 60005. 1 Turbo Vision, 1 Turbo Debugger. 1 Turbo Debugger 1 Turbo Debug- - 1 Thanks to Rst7 for TASM 3.0 (MASM 1 TURELAND. 1 TURBO-90, 1 TRAPDOOR), 1 TR-DOS. 1 TR-DOS, Adventure games: 1 TR-DOS, Z80 ( 1 TR-DOS, 1 TR-DOS). 1 TR-DOS - 1 TR-DOS 1 TR-DOS 1 TOL, CLIMB DOWN). 1 TO MOTOR). 1 TION NIGHT 1 THE ROC 4. 1 THE HULK, SHERLOCK, LORD OF LD HL,L4+2 1 THE CALLS. 1 THANK), 1 TEXT ADVENTURE 1 TERMINATOR' 1 TERMINATOR 1 TER.VAL (ZX- 1 TAP, WEAR CLOTHES). 1 T-TPEXM","X- 1 Spectrum, 1 Spectrum 128K ( 1 Spectrum 1 Spect- 1 Speccy 1 Solomon's Key. 1 Shadow Servi- 1 Scorpion. " 1 Scorpion ZS-256, ATM-TURBO, PROFI 1 Scorpion ( 1 SUN, VAX, 1 STS+TASM 1 STS Monitor". ********************************* 1 STS (v3.2 or v3.3) or MTD 1 STREET'GRED FOOTBALL 1 START+6 1 STALINGRAD...). 1 SQUARED, 1 SPRITE OUTPUT 3 1 SPRITE OUTPUT 2. 1 SPRITE OUTPUT 2 1 SPRITE OUTPUT 1. 1 SPRITE OUTPUT 1, 1 SPRITE OUTPUT 1 1 SPRITE 1 SPECTRUM". 1 SPECTRUM 128 1 SPECCY 1 SPACE: 127, 1. 1 SOUND TRACKER. 1 SOUND TRAC- 1 SOCI- "STEP". 1 SNAIL'S SHELL. 1 SNAIL'S SHELL) 1 SLI: C350: 21 00 58 75 54 5D 13 01 :C6 1 SLI H - CB 34 SLI L - CB 35 C370: A1 77 2B 1B CB 5C 20 F7 :CF 1 SLI D - CB 32 SLI E - CB 33 C368: 00 21 FF 5A 11 37 E2 1A :E9 1 SLI B - CB 30 SLI C - CB 31 C360: 00 40 01 00 18 ED B0 0E :27 1 SLI (HL) - CB 36 SLI A - CB 37 C378: 06 05 76 10 FD CB 31 30 :F5 1 SKIP ! Have a nice play ! 1 SIPHONE), 1 SINCLAIR RESE- 1 SINCLAIR 1 1 SIMPLY SCAN, 1 SIGN, EXAMINE SIGN). 1 SHURRUPAK - 1 SHOWER. 1 SHORT CIRCUIT 2. 1 SHEET OF MUSIC ( 1 SHEEP EYE ( 1 SCROLL, 1 SCAN 1/2 1 SAY TO ZURICH, 1 SAVE "out2.PIX" CODE 65005,148. 39 LD A,E 1 SAVE "in12.PIX" CODE GO SUB 18: LET CADR=CADR+DX*DY: 1 SAVE "in3.PIX" CODE 64494,198. 1 SAVE 13 STOP 1 SAM CRUISE. 1 Reset MagOS 1 RST-DOS. 1 RST#20. 1 RS 232. 1 ROMANTISH" (" 1 ROM; 1 ROLL STATUE, 1 RL: 1 RING 1,2 1 RIFLE). 1 REVOLVER), 1 RES 0,(IX+0),B), 1 RENT BOOK? 1 RENT BOOK. 1 RECRUIT - 1 RECLAM_2: 1 REBEL STAR 1 READ SIGN. 1 READ ONLY ! 1 RE/ARCADE ( 1 RANDOMIZE FN B (X,Y,N,O), 1 RAMBO 2 1 RAM. 1 RALL) 1 RACTOR, 1 R.P.G. 1 R (Run) - 1 QUEST). 1 Q/A/O/P/SPACE, 1 Polygon, Polygon' 1 Physhe ring. 1 Pentagon 128 1 PRESS BUTTON. 1 PRESIDENT'S OFFICE, 1 POLE ATTR, 1 POLE ATTR ( 1 POKE 64909,195 (out3.PIX) 1 POKE 1 PILL-FIR. 1 PESTRY AT FIEND) 1 PERMEABILITY 1 PERMEABI- 1 PC-REWIEV 1 PARTY - 1 PARTS). FISTS), 1 Op;@;pOpO 1 OR, 2 - 1 OPEN CAN, 1 OPEN DOOR. 1 OPEN DOOR, 1 OMEGA LTD." 1 OF MUSIC 1 OE RG ATTR 1 NES). ZX- 1 NATIONAL KARATE 2 1 N5, 1994. 1 N2. 1 N1. 1 Miscellaneous 1 MagOS? 1 MagOS). iS-DOS. 1 MagOS v 6.3 1 MagOS - 1 MagOS v 5.4, 1 MagOS 1 MURPHY. 1 METHUSELAH. 1 MEGADEMO, 1 MAN HELLO), 1 Ltd. MOSCOW 1 LYCANTHROPE 1 LOAD_BYTES, 1 LITE-KUBE ( 1 LITE-KUBE 1 LITE-KU- 1 LIES BETWEEN ABOVE AND BELOW?" And all the same. 1 LICENSED BETTING 1 LESCOPE). 1 LEONARDO 1 LEAVE - 1 LDIR. 1 LD B,XH), 1 LD R,A), 1 LASER GENIUS? 1 LASER BASIC. 1 LAH, ASSUR, KIRKUK, KISH, KISH 1 Kempston-mouse. 1 KISH DELTA 1 KEYBOARD. 1 KEMPSTON-MOUSE. 1 KEMPSTON-MOU- 1 KEMPSTON- 1 KEMPSTON' 1 KEMP- 1 KE BALLOON, EXAMINE BALLOON). 1 KANOID 2, 1 KANOID 1). 1 JACOB'S LAD- 1 J - 1 Icon control ( 1 IT'S WONT LET ME. 1 IR SCOOTER). 1 INVENTORY. 1 INT (IM 2), 1 INT 1 INPUT 3 1 IN A,(...) 1 ICE MOUNTAIN, KAZALLU, NIPPUR. 1 IBM PC- AT- 1 I). 1 HUMAN BEAN STALK, 1 HOMEP?";N2 1 HOLD PHIAL. 1 HL=B*C 1 HIT SHELL WITH PESTLE. 1 HELP. 1 HEAD OVER HEELS. 1 HACKER 2? 1 GW-BASIC 1 GREMLINS 1 GREEN SWORD. 1 GET, FIRE RIFLE). 1 GERANIUM, 1 Font Editor: 1 FORCER. 1 FORCE IN CAR). 1 FIREFLY. 1 FIRE RIFLE), 1 FFFA: 75 03 03 00 00 00 F3 AF :16 11 IF x>26 THEN GO SUB 14: GO 1 FFF2: 10 ED 1C C1 10 D6 C9 30 :AA GO SUB 14 1 FFEA: DD 23 24 10 F6 E1 23 C1 :D8 x=x+1: IF (x/7)=INT (x/7) THEN 1 FFE2: 06 08 E5 DD 7E 00 00 77 :A6 .005,50: PAUSE 4: GO SUB 15: LET 1 FE7D: 02 01 00 00 00 00 00 00 :7E 35 LOOP1 PUSH BC 1 FE75: BB C9 80 40 20 10 08 04 :F3 34 LD B,A 1 FE6D: C1 10 C3 D1 C1 1D 0D 20 :DB 33 LD A,(DY) 1 FE65: 77 F1 D1 14 10 CD E1 23 :91 32 LD IX,(ADDR) 1 FE5D: A9 C6 40 67 DD 7E 00 00 :CC 31 LD (ADDR+1),A 1 FE55: 0F 0F 0F E6 18 A9 E6 F8 :05 30 DEC HL 1 FE4D: 3A CB 3A CB 3A 82 6F 79 :F9 29 LD A,(HL) 1 FE45: BF 93 4F E6 38 07 07 CB :DB 28 INC HL 1 FE3D: F5 7A E6 07 32 63 FE 3E :68 27 LD (ADDR),A 1 FE35: 06 08 E5 CB 27 30 2C D5 :49 26 LD A,(HL) 1 FE2D: DD 21 77 FE C5 D5 C5 7E :7B 25 ADD HL,BC 1 FE25: 64 FE 2A 7F FE 01 00 00 :2D 24 LD (DY),A 1 FE1D: 06 FE 02 20 05 3E A6 32 :5C 23 LD A,(HL) 1 FE15: 7E FE 01 20 04 3E AE 18 :B8 22 ADD HL,BC 1 FE0D: 80 FE 09 3E B6 32 64 FE :1A 21 LD (DX),A 1 FE05: 7E 32 7F FE 23 7E 2B 32 :2E 20 LD A,(HL) 1 FDFD: 2C FE 09 7E 32 2B FE 09 :0F 19 ADD HL,BC 1 FDF5: 01 08 00 09 5E 09 7E 32 :1B 18 LD E,A 1 FDED: 2A 0B 5C 01 04 00 09 56 :DF 17 SUB E 1 FDE8: C9 00 00 00 00 00 00 00 :AE 1;AT 0,0;"SPRITE #";HMS,"DX=";DX 1 FDE0: 23 23 10 F7 1C C1 10 D6 :ED DR): RANDOMIZE USR 3438: PRINT # 1 FDD8: EC FD 47 7E DD 77 00 DD :B4 HEN RANDOMIZE FN N(X,Z,DX,DY,CA 1 FDD0: 7B E6 38 07 07 82 6F 3A :9F 15 LET Z=Y+16: IF A$=CHR$ 13 T 1 FDC8: CB 3F E6 18 C6 40 B1 67 :EB MEMORY!!!": PAUSE 0: GO TO 16 1 FDC0: E6 07 4F 7B CB 3F CB 3F :88 : PRINT #1;AT 0,0;TAB 7;"NO FREE 1 FDB8: E9 FD 3A EB FD 47 C5 7B :44 Y>64911 THEN RANDOMIZE USR 3438 1 FDB0: 23 7E 2B 32 EA FD DD 2A :99 14 IF A$=CHR$ 13 AND CADR+DX*D 1 FDA8: 32 EB FD 09 7E 32 E9 FD :5E 13 IF O=1 THEN GO SUB 34 1 FDA0: 5F 09 7E 32 EC FD 09 7E :25 12 IF O=0 THEN GO SUB 31 1 FDA,Teledisk 1 FD98: 01 08 00 09 5E 3E BF 93 :95 IF O=2 THEN LET O=0 1 FD90: 2A 0B 5C 01 04 00 09 56 :82 11 IF A$="0" THEN LET O=O+1: 1 FD8C: 30 75 00 00 00 00 00 00 :2E 45 LD (IX),A 1 FD84: EC D1 1C C1 10 CF FB C9 :BE 44 PASS LD A,(DX) 1 FD7C: DD 7E 00 77 DD 23 23 10 :7E 43 DJNZ LOOP5 1 FD74: 20 30 09 7B FE 18 30 04 :8F 42 ADD IX,DE 1 FD6C: 4A 3A 8F FD 47 79 0C FE :43 41 POP DE 1 FD64: 7B E6 07 0F 0F 0F 82 6F :E7 40 PUSH HL 1 FD5C: E6 18 0F 0F 0F F6 58 67 :39 39 INC HL 1 FD54: D1 3A 8E FD 47 C5 D5 7B :43 38 INC HL 1 FD4C: 24 C1 10 DF C1 1C 10 CA :D4 37 CALL #30A9 1 FD44: 00 77 23 DD 23 10 EB E1 :B7 36 LD DE,9 1 FD3C: 7B FE 18 30 05 DD 7E 00 :5A 35 CALL #30A9 1 FD34: FD 47 79 0C FE 20 30 0A :52 34 LD L,(IX+1) 1 FD2C: 6F 06 08 C5 E5 4A 3A 8F :63 33 LD H,0 1 FD24: 67 7B E6 07 0F 0F 0F 82 :9F 32 LD E,(IX) 1 FD1C: FD 47 C5 7B E6 18 C6 40 :A1 31 LOOP5 LD D,0 1 FD14: 8E FD DD 23 D1 D5 3A 8E :0A 30 JR Z,PASS 1 FD0C: 8F FD DD 23 DD 7E 00 32 :22 29 DEC B 1 FD04: DD 19 10 E5 DD 7E 00 32 :79 28 INC B 1 FCFC: 00 CD A9 30 23 23 E5 D1 :9A 27 LD IX,(ADDR) 1 FCF4: DD 6E 01 CD A9 30 11 09 :FC 26 LD B,A 1 FCEC: 1B 16 00 DD 5E 00 26 00 :7A 25 LD A,(HL) 1 FCE4: FD DD 2A 8C FD 04 05 28 :9E 24 ADD HL,BC 1 FCDC: FE 03 20 05 3E A6 32 44 :58 23 LD (DY),A 1 FCD4: FE 02 20 04 3E AE 18 06 :FE 22 LD A,(HL) 1 FCCC: FE 01 20 04 3E B6 18 0E :05 21 ADD HL,BC 1 FCC4: 7E 09 47 AF 32 44 FD 7E :2E 20 LD (DX),A 1 FCBC: 56 01 08 00 09 5E D5 09 :5C 19 LD A,(HL) 1 FCB4: F3 2A 0B 5C 01 04 00 09 :42 18 ADD HL,BC 1 Expanded Me- 1 EYE STINGER' 1 EXAMINE PISTOL). 1 ENRAKI, TRYSTA, THE ROC, FLOATING 1 ED 7C ). 1 ED 5C - NEG). 1 EAT. 1 Debugger; 1 DX*DY <= 96. 1 DRIVE. 1 DRAGON). 1 DOS RST#20 1 DJS & LAPTEV 1 DJNZ L4, 1 DIZZY: 1 DIZZY DEAN 1 DIZZY PERMEABILITY, 1 DISKPRO- 1 DISK ERROR! 1 DIAN TEMPLE), 1 DIAMOND ( 1 DELTRACTOR). 1 DELTA. KISH DELTA - 1 DEF FN, 1 DEF FN W (X,Y,L,H,C,I) = 1 DEF FN I (X,Y,L,H,N). 1 DE-ADVENTURE. 1 DD CB 80 00 - 1 DD CB 00 1 DAVE KELLERN 1 DAVE KELLERN 1 DATA. 1 DARK DIS- 1 DANGER MOUSE, 1 D. 1 D. 1 D,E,A,T,H 1 Coming soon from us: MasTer Debuger 1 CYSSUP". 1 CUDDLY TOY), MAGIC MIRROR, GOLD 1 CREDITS). mov 1 CREATURE), 1 CLIMB ROPE, 1 CLEAR 24063 1 CIPLES. 1 CHIPS). 1 CHEST, OPEN CHEST), 1 CHEESE): - 1 CHASE H.Q. 1 1 CAPS SHIFT. 1 CALL #5CC2 1 C3D0: C3 2F 3D 00 00 00 00 00 :C2 40 RANDOMIZE USR 27392 1 C3C8: 00 5C E1 D9 FB C9 DD E5 :27 30 LOAD "gam2"CODE 24064,41472 1 C3C0: 43 00 5D ED 53 FE 5C 22 :DF 20 LOAD "gam1"SCREEN$ 1 C3B8: 10 B4 CB 41 20 0E D9 ED :3F 10 CLEAR 24063 1 C3B8: 00 1A ED B0 12 C9 00 40 :4D 6 INC DE 1 C3B0: 5C 10 D0 18 05 1E 00 14 :FE 1 C3B0: 21 BF C3 11 BE C3 01 20 :C9 5 LD E,L 1 C3A8: 7B D6 04 5F 0D 20 CC C9 :E1 4 LD D,H 1 C3A8: 0C CB 41 20 04 7B 32 FF :53 1 C3A0: F5 7B C6 04 5F F1 30 04 :21 3 LD HL,#5800 1 C3A0: C1 D1 E1 24 1C CB 63 20 :64 1 C3A0: 05 FB D8 AF D3 FE 18 A8 :7B 1 C398: 23 10 F2 79 FE 04 28 0C :2F 2 ENT $ 1 C398: 21 00 58 11 00 03 CD A9 :5E 1 C398: 04 DD 21 0A 3F CD CE C3 :04 1 C390: C5 DD 21 1B 2F CB 41 20 :8C 1 C390: 1F 32 96 C3 DD 7E 00 77 :CF 1 ORG 50000 1 C390: 11 00 07 DD 19 10 D7 DD :25 1 C388: 32 FF 5C 22 00 5D E5 D5 :11 1 C388: 23 10 F2 06 10 1D 7B E6 :04 1 C388: 11 20 00 DD 19 10 E2 C1 :25 1 C380: C3 C1 D1 CB 41 20 07 7B :46 1 C380: 20 DD C9 00 00 00 00 00 :09 1 C380: 1F 32 86 C3 DD 7E 00 77 :AF 1 C380: 10 FD 0F 0F 0F 30 D7 C9 :4D 25 LOOP1 INC E 1 C380: 00 DD 19 10 F1 DD E1 C1 :B9 1 C378: 74 20 E5 E1 D1 06 03 76 :E5 24 LOOP LD B,#10 1 C378: 3E 2C DD 21 4D 2F CD CE :BA 1 C378: 32 AA C3 06 10 1C 7B E6 :6D 1 C378: 20 00 CD A9 05 C1 11 E0 :88 1 C378: 10 F6 7C FE 58 20 E5 15 :2D 1 C370: AF CB 16 23 AF CB 1E 23 :A1 1 C370: 7A B7 1F 4F 3E 3C 30 02 :7E 1 C370: 32 9D C3 78 32 A3 C3 87 :5C 1 C370: 0F 0F 2B 1B 10 EC 0F CB :6D 23 LD (POKE3+1),A 1 C370: 08 C5 DD E5 06 08 C5 11 :A6 1 C368: E7 C9 1E 00 79 CB 3F 3C :B8 boot' 1 C368: E6 F8 F6 00 D3 FE 79 0F :58 22 ADD A,A 1 C368: 23 AF CB 16 23 10 F6 41 :48 1 C368: 21 65 2F CD CE C3 D5 C5 :D8 1 C368: 08 C5 D5 C5 18 0F C5 06 :84 ( 1 C360: CD 6A 05 D1 06 03 C5 06 :04 1 C360: B0 C3 3E 7F DB FE 1F 38 :83 1 C360: 5D D9 AF 32 00 5C F3 DD :66 1 C360: 10 FD CB 09 38 EC C9 00 :F1 1 C360: 10 21 00 40 41 AF CB 1E :6D 46 RET 1 C360: 06 18 4F EB A6 EB B6 77 :39 21 LD (POKE2+1),A 1 C358: 5C ED 5B FE 5C ED 4B 00 :51 1 C358: 58 01 05 01 CD 6A C3 CD :41 1 C358: 2B CB 5C 20 F8 06 05 76 :06 1 C358: 03 ED B8 EB 3E 80 D5 E5 :26 20 LD A,B 1 C358: 01 FF 02 ED B0 16 08 0E :E6 45 OUT (254),A 1 C358: 00 97 3D 37 F3 14 08 15 :4A 1 C350: FB 76 DD 21 BE C3 21 00 :24 1 C350: DD 21 00 40 DD E5 11 20 :44 N11-12, 1 C350: CB 41 20 12 D9 E5 2A 00 :39 1 C350: 21 87 DE 11 FF 5A 01 00 :04 19 LD (POKE1+1),A 1 C350: 21 00 58 54 5D 13 36 07 :8D 44 AND 7 1 C350: 0E 7F 21 FF 5A 7E A1 77 :B0 1 Basic-128. 1 Basic-128 ( 1 BY THE PROGRAM 1 BUTTON. 1 BUSY. 1 BUSINESS/MANA- 4) VIEW TRANSFER MARKET; 1 BROWNOUT DETECTED). 1 BREAK. 1 BOMB JACK, COMMANDO, INTER- OUT (#FE),A 1 BENEFIT CARD ( 1 BEGIN...END'o 1 BC? 1 BC. 1 BATMAN (+3 levels). 1 BASILISK' 1 BARREL THROUGH TRAP DOOR) 1 AY: 1 AY-3-8910. 1 AY-3-8910. 1 AY-3-8910, 1 AVENGER, RANARAMA, JET SET WILLY, 1 ATTACK!) 1 ARKANOID1 1 ARKANOID 1, F.I.R.E. 1 ARKANOID 1 1 ARD) - 1 ARCH LTD (!) 1 ALBION WOULD YOU FIND THAT WHICH Three numbers together 1 AL SECURITY OFFICE. 1 ADVENTU- 1 ADVEN- 1 A - 1 : IF INKEY $ ="" THEN GO TO 30 1 9, PRITE"; 1 82. 1 8). 1 76D8: 00 00 00 00 00 00 00 00 :4E 15 PAUSE 1: LET A$=INKEY$: IF 1 76D0: 00 00 00 00 00 00 00 00 :46 14 RETURN 1 76C8: 00 00 00 00 00 00 00 00 :3E -MOVE"; 1 76C0: BB FF FF E7 BA 04 1A 00 :AE 1;;"0-PUT SPRITE SINCLAIR2 1 76B8: 69 B5 2B D6 49 A1 40 20 :97 EEN 2-SAVE SPRITES"; INVERSE 1 76B0: DD 7F A7 DE 2D 9F 89 04 :60 13 PRINT #1;AT 0,0;"1-LOAD SCR 1 76A8: 34 6A D6 E9 9A FE F9 FF :0B 12 GO TO 7 1 76A0: B8 51 F0 7D FA 75 F2 F4 :E1 O SUB 19: RUN 1 7698: 00 02 07 47 D7 FF BF 7F :72 11 IF A$="2" AND HMS>0 THEN G 1 7690: 00 00 00 00 00 00 00 00 :06 AND Y<21)-(A$="9" AND Y>0) 1 7688: FC 00 10 3B FF DE DC 00 :FE A$="6" AND X>0): LET Y=Y+(A$="8" 1 7680: 01 00 07 0F 0F 07 01 00 :24 10 LET X=X+(A$="7" AND X<31)-( 1 7678: 00 00 80 80 80 00 00 00 :6E HMS+1: GO TO 7 1 7670: EB E3 7F FF D7 B8 7F FF :3F NEXT M: NEXT N: NEXT K: LET HMS= 1 7668: 07 07 0C 0B 07 07 07 00 :18 SADR+M+N),255: LET CADR=CADR+1: 1 7660: 00 00 00 00 00 00 00 00 :D6 OKE CADR,PEEK (SADR+M+N): POKE ( 1 7658: 00 00 00 F8 FC FE F2 E3 :95 X-1: FOR M=0 TO 1792 STEP 256: P 1 7650: 00 00 00 00 01 03 03 07 :D4 *(K-8*INT (K/8)): FOR N=X TO X+D 1 7648: 00 00 00 00 00 00 00 00 :BE LET SADR=16384+2048*INT (K/8)+32 1 7640: CC 00 00 B0 FC F6 F6 00 :1A =65535 THEN FOR K=Y TO Y+DY-1: 1 7638: 01 00 00 01 01 01 01 00 :B3 9 IF A$="0" AND CADR+DX*DY*8< 1 7630: 00 00 80 80 80 00 00 00 :26 ; 1 7628: EB E3 FF B7 7B 78 7B B7 :47 8 PRINT AT Y,X; OVER 1;"80V " 1 7620: 07 07 0F 0F 0F 07 07 07 :E6 TO 6 1 7618: 00 00 00 00 00 00 00 00 :8E ;: GO SUB 15: IF A$="1" THEN GO 1 7610: 00 00 00 F8 FC FE F2 E3 :4D 7 PRINT AT Y,X; OVER 1;"80V " 1 7608: 00 00 00 00 01 03 03 07 :8C 17 1 7600: 00 00 00 00 00 00 00 00 :76 LASH 8: LET X=0: LET Y=0: GO SUB 1 75F8: F8 FC 00 10 3B FF DE DC :65 6 INK 8: BRIGHT 8: PAPER 8: F 1 75F0: 07 01 00 07 0F 0F 07 01 :9A T SZ=DX*DY*8 1 75E8: 00 00 00 80 80 00 00 00 :5D 5 LET HMS=0: LET CADR=ADR: LE 1 75E0: E3 EB E3 F1 FE DF EF F7 :BA ;DY 1 75D8: 07 07 07 0F 0F 0F 07 07 :9D 4 INPUT "Y SIZE OF SPRITE ? " 1 75D0: 00 00 00 00 00 00 00 00 :45 ;DX 1 75C8: 00 00 00 00 F8 FC FE F2 :21 3 INPUT "X SIZE OF SPRITE ? " 1 75C0: 00 00 00 00 00 01 03 03 :3C EN GO TO 2 1 75B8: 80 80 00 00 00 00 80 80 :2D DR: IF ADR<30000 OR ADR>65527 TH 1 75B0: EF FF FE 00 C7 45 EF EF :FB 2 INPUT "SPRITE ADDRESS ? ";A 1 75A8: 03 03 00 00 01 01 03 03 :2B SPECIAL FOR ~ZX-REVIEW~" 1 75A0: 00 80 8C 9E DE DC C0 C0 :F9 "(C) Vadim Bodrov, Ufa, 91/95"'" 1 7598: 93 11 55 11 FF FF 7D 83 :15 LEAR 29999: PRINT "SIMPLY SCAN"' 1 7590: 01 03 63 F3 F7 77 07 07 :DB 1 BORDER 7: PAPER 7: INK 0: C 1 7588: 00 00 00 00 00 00 00 00 :FD 1 7580: 00 00 00 00 00 7C FE FF :6E 1 7578: 00 00 00 00 00 00 00 01 :EE 1 7570: 80 00 00 00 00 00 80 80 :65 1 7568: FF FE 00 00 C7 45 EF EF :C4 1 7560: 03 00 00 00 01 01 03 03 :E0 1 7558: 80 80 80 C0 D8 DE DE 9E :3F 1 7550: 11 55 11 FF FF 7D 83 EF :29 SIZE, Y SIZE), 1 7548: 03 03 03 07 37 F7 F7 F3 :E5 1 7540: 00 00 00 00 00 00 00 00 :B5 1 7538: 00 00 00 00 7C FE FF 93 :B9 1 7530: 00 00 00 00 00 00 01 01 :A7 1 7 AY 1 64912,93. LET HMS=HMS+1: GO TO 8 1 64909 - 1 64908, 1 64689,80: POKE 64690,195 ( 1 6). 1 500: OUT (254),A 160: RANDOMIZE USR 39014 1 50049. 1 50000. 1 5-10 MHz, 1 40, 240, 560 1 4. 1 33 ("!"). 1 32768. 1 27392. 1 24576. 1 23867), 1 23296. 1 21469 1 1F,3F,5F,7F,FF). 1 1: 1 1995 NN 1,2,3. 1 1995 (c 4 1 1993 ShiSoft": 1 1991, 1992, 1993 1 1991 KORDIAL"; 1 191 1 1600-1800, 1 16. 1 16, 48, 128, 256 1 16 1 15635). 1 15 AY. 1 14. 1 14 AY. 1 128" ). 1 12-20. 1 11400)? 1 1.2M; 1 0: 1 0. 1 0, 1, 2, 1 ... 1 ... 1 -MY DYING BRIDE- THE BEST D 1 - cLOThes). 1 - ZZZZ 1 - Scrapbook - 1 - SCAN 1/2 1 - ORNATE KEY, 1 - Multiple, 1 - Merge). 1 - CS+SPACE. 1 - 666. 1 - 24575 (#5FFF)). 1 - "1". 1 - UNRAVEL 1 - FRODO. 1 ********************************* CP #80 1 ********************************* 128 1 ********************************* 1 (have something to trade) 1 (Y,X+1). 1 (WITH BOW, 1 (WEST). 1 (WEST). 1 (WELD PLATE). 1 (WEAR GLOVES), 1 (WEAR BLUE GLOVE). 1 (WAR GAL- 1 (WALLS OF KISH), 1 (WAIT), 1 (VIBROSAW), 1 (USE). 1 (USE MONEY). 1 (USE BIKE). - 1 (UP). 1 (TWIST TAP). 1 (TWIST TAP) 1 (TWIST HAND) 1 (TURN, TURN, TURN) 1 (TURN SPHERE) - 1 (TRAP ONE). 1 (TOWN HALL); 1 (TIN CAN) 1 (TIE WIRES). 1 (THUMB TO LIFT). 1 (THROW TA- 1 (THROW ROPE) 1 (THROW ROPE 1 (THROW DUST) 1 (THROW 1 (THE ROC) - 1 (TALK MAN), 1 (TAKE SPA- (BLOW SAND) 1 (TAKE ROOF), 1 (TAKE HAT) 1 (TAKE CHEESE, EAT 1 (TAKE BATON) 1 (TAKE ALL, EXAMINE PERMIT). 1 (Scorpion' 1 (SWITCH STROBE), 1 (SWIM), 1 (SWIM TO SHORE). BANDIT), 1 (SWIM TO BED), 1 (STOP BUS). 1 (STONE COFFERS). 1 (STONE CANNONBALL) 1 (STEP CROCODILE). 1 (STEAL), 1 (STAFF). 1 (SPIDERMAN, SEAS OF BLOOD, OPERA- LD IX,#3F0A (***) 1 (SMALL KEY), BEE). 1 (SMALL DISK). 1 (SIT DOWN). 1 (SIT IN CAR 1 (SILVER BOX), 1 (SHOVEL). 1 (SHARP PIECE OF GLASS). 1 (SEARCH TUBE- 1 (SEARCH RACKS, SHELVES AND CUPBO- 1 (SCORPION). 1 (SAY TO ATTENDANT HESTRA HELLO), 1 (SAY TO BILLY 1 (ROPE GUN) 1 (RIVERS OF 1 (RING BELL), 1 (REMOVE HARNES), 1 (REMOVE CLOTHES), 1 (RED OVE- 1 (RATMAN), 1 (RAISE HAND). 1 (RAISE BATON). 1 (PUT SPHERE ON DISK) 1 (PULL WEST). 1 (PULL HANDLE) 1 (PULL BIKE), 1 (PRESS KNOB). 1 (POTION). 1 (POTION). 1 (POLICE); 1 (PLUG DRILL). 1 (PLANT EGG) 1 (PLACE HAND) 1 (PLACE A 1 (PINT OF BE- 1 (PILE OF ROCKS), 1 (PHANTOM). 1 (PAWN SHOP). 1 (OPEN EXIT, LEAVE BUS). - 1 (OPEN BAS- 1 (OLD SHACK). 1 (OIL). 1 (OIL CAN), 1 (NOTES). 1 (Mega Arts) 1 (LOSE IN 1 (LONG PLANK) 1 (LOFT), 1 (LAND). 1 (KNOCK DOOR) 1 (JUSTICE AND PEACE). 1 (JAR OF HONEY) 1 (Insert), 1 (INSERTIN) 1 (INSERT PLUG), 1 (INSERT PIPE) 1 (INSERT CARD TO VI- (BUY CHIPS), 1 (INSERT CARD). 1 (ICE MOUNTAIN) 1 (HORRIFING CREATURE), 1 (HEART BROKEN, 1 (HAND 1 (HAMMER). 1 (GUN POWDER). 1 (GO OUT), 1 (GO HOLE), 1 (GO CANNON), 1 (GO BOOT) 1 (GO BEACH). 1 (GIVE TE- 1 (GIRO)? 1 (GIANT GLOWING MOTH). 1 (GET ROPE, CLIMB ROPE). 1 (GET BUCKET, FILL PISTOL) 1 (GET BREATH) 1 (FUNGUS). 1 (FORCE OUT CAR). 1 (FLY UP) 1 (FLY OVER PIT) 1 (FISH-FUNGUS). (CIRCUS CANNON). 1 (FIRE RIFLE). 1 (FIRE CANDLE). 1 (FIRE (DROP HAT) 1 (FFC COMP.): 1 (FFC COMP.), 1 (EXAMINE) 1 (EXAMINE WALL) 1 (EXAMINE TIE, 1 (EXAMINE TABLE). 1 (EXAMINE TABLE), 1 (EXAMINE SAND) 1 (EXAMINE FRIDGE) 1 (EXAMINE FIRE) 1 (EXAMINE CROCODI- 1 (EXAMINE COT) - 1 (EXAMINE BUCKET). 1 (EXAMINE BO- 1 (EXAMINE BASKET). 1 (ENTER HATCH), 1 (ENTER BUS), 1 (ENTER BOX), 1 (ENTER BATH). 1 (ENTER BUS), 1 (EAST, WEST) 1 (EAST). 1 (Delete), 1 (DUMP), 1 (DRY TOWEL). 1 (DROP TIE) 1 (DROP SPADE). 1 (DROP SIGN) 1 (DROP PERMIT, TA- 1 (DROP BULL- 1 (DROP BUCKET, DROP PIS- 1 (DRINK POTION) 1 (DRINK 1 (DRILL) 1 (DRILL PLATE). 1 (DOORWAY). 1 (DISCONNECT CELL), 1 (DIG), 1 (DIA- 1 (DEEP PIT). 1 (DEATH RAY). 1 (DEATH DOG). 1 (CUT TREE), 1 (CUT ROPE). 1 (CUT PIPE) 1 (CRASHED 1 (CONNECT CELL 1 (COINS). 1 (CLOSE FRIDGE) 1 (CLIMB WELL). 1 (CLIMB VINE), 1 (CLIMB ROPE) 1 (CLIMB VINE), 1 (CLIMB COT), 1 (CLEAN DROID WITH A RAG). 1 (CHARGE CELL) 1 (CAVITY); 1 (C) CHUNG Software, 1 (BUY TRAVEL ("WHERE TO?"). 1 (BUY NEWSPAPER) 1 (BURY ...). 1 (BURN), 1 (BRONZE BELL). 1 (BREAK WINDOW). 1 (BOARD TRA- 1 (BANDLE OF NOTES). 1 (AIM TAR- 1 (AIM DUCK), 1 (AIM ATTEN- 1 (AIM DUCK, 1 (ADDR). " 1 (?) ZX-NEXT, 1 (2) DJNZ L4, 1 (128 - 1024 1 (***): 21 XOR A 1 (#22E5), 1 ("boot") 1 #FF. 1 #FF. 1 #5CFE-#5D01 1 #5CC3/4. 1 #5CC3/4, 1 #5CC2-#5CC4 (23746-23748). 1 #3D13 L4 LD HL,0 1 "out3.PIX" CODE 64692,220. 1 "out2.PIX"): 15 LD E,(HL) 1 "out1.PIX"): 1 "out1.PIX" CODE 65153,125. 50 LOOP1 SLA A 1 "out.BLK"): 1 "out.BLK" CODE. 15 RANDOMIZE FN b(x,y,n,o): RE 1 "out.BLK" CODE 65394,141. 1 "out.BLK" 1 "mus"CODE 50000,85. 1 "in3.PIX"): 1 "exam.BLK". SCAN. 1 "exam.BLK" CODE 1 "calculator". 1 "YOU ARE SO UN- 1 "The Sentinel" 1 "Tape loading error") 1 "TPACK2&3" 1 "TA- 1 "Scorpi- 1 "SPECTROFON". 1 "SPECCY" 1 "REM 2" ( 1 "RACING NEWS", 1 "PRESIDENT'S GUARD" 1 "PENTAGON 128", " 1 "P.SIM". 1 "Magic". 1 "Magic" 1 "MEGA BASIC". 1 "MAGIC", 1 "IN TROUBLE AGAIN" (" 1 "HEART BROKEN". 1 "H". 1 "GAME OVER" 1 "FWORD for 1 "FRED WING NUTS". 1 "EXAMPLE". 1 "EXAMINE NEWS". 1 "ADM 7.08". 1 "$&(+-/2479<?ADGJMORUX[^adgjmptwz} 1 x=x+1: LET n=4: GO SUB 15: BEEP 24 LD (ATTR),A 1 x=x+1: IF (x/7)=INT (x/7) THEN 1 proizBoditsa oknom": 1 pri BXodE B MEnq BybirAqtsa" 1 pErEmEwEniE linzy" 1 out3.PIX 1 iS-DOS. 1 hotq tut lu^ 1 Y<168)-8*(A$=CHR$ 9 AND Y-DY+1>6 1 Y: DRAW DX*8-1,0: IF DY=1 THEN 1 Y+1>0) DX*DY - 1 Windows, 1 VISIPHONE. (PAWN REVOLVER) 1 Turbo Vision. 1 Turbo Debugger 1 Turbo 1 TRAP DOOR 1 TR-DOS, " 1 TR-DOS) 1 TR-DOS (#3D13 1 TR-DOS 1 TOADSTOOL & 1 THIS PROGRAM 1 THEN LET Y=Y+8*(A$=CHR$ 15 AND 1 THEN LET DY=DY+8*(A$=CHR$ 9 AND 1 TERMINA- 1 T i SAVE "exam.BLK" CODE 30000,432 - 1 Spectrum-128 1 Spectrum' 1 Spectrofon' 1 Spect- 1 Sinclair- 1 Scorpion' 1 Scorpion ZS-256? 1 Scor- 1 SUB 20: IF A$="N" OR A$="n" THEN 1 SUB 19: LET n=1: GO SUB 19: NEXT 1 SUB 15: IF A$="N" OR A$="n" THEN 1 STROBE. 1 STROBE ( 1 START+6 1 SPRITE INPUT 3 5. 1 SPRITE OUTPUT 2 1 SPRITE INPUT E:";DX*DY: BEEP .05,10: PAUSE 0: 1 SPELLBOUND. 1 SPACE (0). 1 SOME SOOT ( 1 SE 4: LET x=x+1: LET n=4: GO SUB 1 SAVE_BYTES 1 SAN-SAN. 1 RITE: ";DX;"X";DY 1 RETURN 1 PRINT. 1 POKE 23607,(k1-1) 1 ORDER 0: CLS : LET adr=30000: PO 8 ENT $ 1 ORDER 0: CLS : LET adr=30000 1 OP 1 NEXT I: GO SUB 18 1 NEXT I: GO SUB 14 19 ADD HL,BC 1 ND*4+3);(RND*255),(RND*75+100): 18 LD (DX),A 1 ND*4+3);(RND*255),(RND*75+100): 1 N4 ************************** 1 N149, ("SCORPI- 1 MOCTUPER. 1 MICROPROTECTOR 1 MEGA-BASIC (ZX-SPECT- 1 MAGIC MIRROR, 1 LUCAS 1 LOOK AROUND 1 LOAD_BYTES 1 LOAD "out.BLK"CODE 2 ; VADIM BODROV (C) 1995 1 LASER BASIC- 1 KILL, FIGHT 1 KEY-INPUT. 1 KEMPSTON- 1 KEMPSTON- 1 KEMPSTON 1 KE 65529,adr-(256*INT (adr/256)) 9 LD HL,(#5C0B) 1 KAZALLU ( 1 JOIN QUELIE. 1 ION-256"). 1 INVENTORY 1 INSERT SILVER (GOLD) DISK 1 IN reg,(C) 1 GO SUB 18 1 FOR x=1 TO 30 STEP 3: GO SUB 19: 1 EXIT 35 L2 LD IX,#2F4D 1 EXAMPLE. 1 EMPLOYMENT EXC- 1 E USR 15619: REM : LOAD "win.BLK 5 ; DEF FN W(X,Y,L,H,C,I) 1 DX*DY*8: LET a$="": FOR i=32 TO 1 DISK-DOC- 1 DELIT- 1 DEF FN N (X,Y,L,H,A). 1 DDRESS: ";ADR 1 DDRESS: ";ADR 1 DD 46 - 1 D ""CODE 16384 20 LD IX,#5800 1 CLIMB AROUND SHAFT 1 CLAW LAKE, 1 CLAW HAMMER, 1 CHARS, 1 Basic-128 1 BREAK - 1 BLOCK OUT 1 BLISS. 1 BETA-DISK 1 ATTACK 1 ARTSTUDIO 1 ARCA- 1 A$="" THEN GO TO 15 1 =x+1: LET n=3: GO SUB 15: BEEP . 22 ADD HL,BC 1 =3: GO SUB 19: BEEP .005,50: PAU 1 : POKE 65530,INT (adr/256) 10 LD BC,#0004 1 : NEXT x 13 LD BC,#0008 1 : LET DY=8*INT ((DY+1)/8) INPUT 3, 1 : INK 7: RANDOMIZE FN W(0,15,32, 15 LD E,(HL) 1 : INK 7 1 : DEF FN w(X,Y,L,H,C,I)=USR 6527 1 93 09.txt 1 84-92 08.txt 1 80+256*195= 1 8,128,0,0,0,1,0,7,15,15,7,1,0,25 1 8 1 7,255,215,184,127,255,0,0,128,12 1 6912 23 ; 1 66-83 07.txt 1 64689, 1 64-32-23. 1 6,16392,22536,16408,22552 C368: 3F 28 07 1E 01 CD A9 05 :33 1 6, 7, 8 1 6*3*3*8=432 1 54-65 "art2.pcx" 06.txt 1 531,DX: POKE 65532,DY:: RANDOMIZ 4 ; 1 50000, 1 50 000 $ 1 5,255,231,186,4,26 1 5,181,43,214,73,161,64,32,187,25 3X3 1 43-53 05.txt 1 406: READ a: POKE i,a: NEXT i 1 4,52,106,214,233,154,254,249,255 1 4,18440,22792,18456,22808 C358: FF 37 F3 14 08 15 CD 6A :AC 1 3606,0: POKE 23607,60: RETURN 1 32768!!! ( 1 32-42 04.txt 1 31)-(A$="6" AND X>0): LET Y=Y+(A 1 31)-(A$="6" AND DX>1): LET DY=DY 1 3,71,0) 16 ADD HL,BC 1 3 1 27,184,81,240,125,250,117,242,24 1 24999, 1 248,252,254,242,227,0,0,0,0,0,0, 1 20 1 2,0,16,59,255,222,220,0,0,0,0,0, 1 2,0): GO SUB 18: RETURN 1 18 DRIVER ... ; 1 17 JP 27392 ; 1 16 CALL DRIVER ; 1 15619: REM : LOAD "exam.BLK"CODE 1 15-31 "bodrov.pcx" 03.txt 1 15 LD BC,#A205 ; 1 14 LD HL,24064 ; 1 13 CALL DRIVER ; 1 12 LD BC,#1B05 ; 1 11 LD HL,16384 ; 1 10 LD SP,24063 ; 1 1/2", " 1 1,3,4,5 1 05,50: PAUSE 4: LET x=x+1: LET n %,& 1 05,50: PAUSE 4: GO SUB 15: LET x 21 LD (DY),A 1 005,50: PAUSE 4: GO SUB 15: LET 23 LD A,(HL) 1 0,20488,23048,20504,23064 C378: CD A9 05 DD 2B DD 2B DD :A3 1 0,0,7,7,12,11,7,7,7,0,235,227,12 1 0,0,0,0 1 / * - + & ', 1 .. A3 END ; 1 .. ... ; ( 1 -1);: LET m=m+dx: NEXT w: POKE 2 1 - WINDOW ATTR, 1 - "PROFI+", 820 - 1.5k 1 - OR ( 1 - C350: 21 01 00 06 A0 C5 E5 CD :52 1 - 3. A sign of the devil 1 ,221,127,167,222,45,159,137,4,10 1 +(A$="8" AND Y-DY>1)-(A$="9" AND 1 ): LET Y=8*INT ((Y+1)/8)-(Y>0) 1 (k/256): POKE 23606,(K-K1*256): 1 (WEST) 1 (USE SPADE, 1 (USE SPADE). - 1 (UNTIE 1 (TWIST 1 (TRAVEL DOCU- 1 (TR DOS). 1 (TALL REPTILION 1 (TALK TO DROID REPA- 1 (TAKE BUCKET), 1 (TAKE ALL, 1 (SWITCH) - 1 (STAND DROID), 1 (STAFF OF 1 (SQUEEZ TO- 1 (SOGGY TOWEL), 1 (SHOW PASS) 1 (SHEEP EYE), 1 (SAY TO ORC- 1 (SAY TO 1 (RING BELL). 1 (RIFLE), 1 (RG ATTR) 1 (REMOVE COVER WITH 1 (RAISE SIGN). 1 (Paste, 1 (PURPLE 1 (PLI- 1 (OPEN VALVE). 1 (OPEN EYES). 1 (ONE-EYED MU- 1 (LOOK IN 1 (LIFT BILLY), 1 (LIFT BUCKET) - 1 (LICENSED BETTING 1 (LEAVE BATH, TWIST 1 (KILL SOLDER 1 (KICK SAND AT SER- 1 (JUMP), 1 (JUMP OVER PIT), 1 (Have something to 1 (GIVE CARD) 1 (GET BARREL), 1 (FLY), 1 (FLASHLIGHT), 1 (FIRE PISTOL) 1 (EXAMINE 1 (ENTER PIT) 1 (ENTER 1 (EMS), 1 (EMPLOYMENT EXC- 1 (DROP OF MOONSHINE). 1 (DROID), 1 (DIAMONDS) 1 (CUT). 1 (CUPBOARD) 1 (COUCH SHELTER), 1 (CLOSE EYES), 1 (CLIMB WELL) 1 (CHAIN- 1 (CASH 1 (CARD). 1 (BOATHOOK) 1 (BLUE ROOM), "GO TO ME". 1 (BIT & BEAT) 1 (AWAITING 1 (ARCA- 1 (ALCOMETER), 1 (31+SZ/8): LET a$=a$+CHR$ i: NEX 1 (1, 2, 3, 4 1 (1) 1 $="9" AND Y<175)-(A$="8" AND Y-D 1 $: CLS : RANDOMIZE USR 15619: RE OVER 1 ( 1 #FF. 1 #60-#7F ( 1 "gam2". 1 "gam1" 1 "ZURICH" - 1 "YOU NEARLY TRIPPED" ( 1 "WHERE IN You'll need to name 1 "THROW FLAME AT..." 1 "HOW?" 1 "EXAMPLE2" 1 "CODE 6 ; =USR 65278 1 ";a$ 1 v4.01, DD63 v5.03. 1 v3.0 (by 1 rect control ( 1 perNintendo, Genesis, Genesis-CDX, GameGear, GameBoy, Panaso- 1 nic-3DO 1 iS-DOS, 1 iS-DOS! 1 i: RETURN 1 control. 1 ZEUS - 1 Y-DY>0)-8*(A$=CHR$ 15 AND DY>7) 1 WITH PLANE" 1 WINDOW, SWAP TOKEN). 1 UP), 1 UND TRACKER RECOMPILER. 1 TREE), 1 TENTACLED THING. 1 TECTOR. 1 TAL PLATE) 1 Scorpion. 1 STS3.3. 1 SPECTRUM 128. 1 SPECCY 1 SISTERS, WRECK, MARAD, SHALLOWS 1 SAVE 49 PUSH HL 1 SAVE 48 LD (IX),A 1 RG ATTR, OE 1 RECOMPILER 1 RAM, 1 PRINT AT w,x-1;" ";a$(m TO m+dx 1 PRESS 1 PLOT_SUB 1 ON HIGH" 1 OFFICE); 1 OF DEAD). 1 Nor- 1 NEXT x: OVER 0 1 NACLE). 1 MINE BANDIT), 1 METHUSELAH. 1 LOAD "loader"CODE (23872+257) LD BC,112 1 LIGHT 1 LERS), 1 Icon control, 1 INTO SLOT, 1 HATCH) 1 GAMBLING), 1 FOR x=1 TO 30 STEP 3: GO SUB 15 12 LD D,(HL) 1 FOR n=1 TO 8: FOR m=0 TO 31 22 CALL ONE 1 FIRE), 1 Disk Control Utility ( 1 DY>1)+(DY=0) 1 DRAW 0,DY-1: PLOT X*8,Y: RETURN 2+DX*DY*8+DX*DY 1 DD/FD); 1 CONCIERGE HELLO), 1 CLASS X MINERALS" 1 CE LASER). 1 CAPS SHIFT+1. 1 C3A0: 23 10 E6 C9 00 00 00 00 :45 1 C398: 18 05 DD E5 E1 36 00 DD :2E 1 C390: E5 E1 36 00 21 A4 C3 35 :0C 1 C370: 5F ED 52 5A 3F ED 52 22 :CB 1 C368: 4D 5F 29 17 29 17 09 8B :EB 1 C360: 29 17 29 17 ED 42 9B 44 :B1 1 C360: 10 F3 3A 7F C3 E6 07 D3 :62 1 C358: 8A 44 4D 5F 29 17 29 17 :15 1 C350: 2A 7B C3 11 01 00 AF 19 :55 1 BOX). 1 BEGIN.....END 1 9 A2 LD DE,(#5CF4) ; 1 8 ORG 23296 ; 1 7 A1 DEFS 0 ; 1 65532 1 641812, 1 620075, 1 6 JP #33C3 ; 1 50 . . . 1 5 PUSH DE ; 1 40 RANDOMIZE USR 25000 1 4 LD DE,23296 ; 1 386DX40 (benchmark=43) 1 30 RANDOMIZE USR 25006: PAUSE 1 1 3 LD BC,A3-A2 ; 1 20 RANDOMIZE USR 25000 1 2 LD HL,A1 ; 1 19: BEEP .005,50: PAUSE 4: LET 1 144003, 1 120 DATA 18432,22784,18448,2280 C370: 18 EF DD 21 FF 5A 1E 01 :B0 1 110 DATA 20480,23040,20496,2305 C360: 05 DD 2B DD 2B DD 7C FE :8F 1 100 DATA 16384,22528,16400,2254 C350: DD 21 FF 57 11 01 00 3E :B7 1 1 ORG 23872 ; 1 (WAKE BANDIT) 1 (UNTIE TREE) 1 (TURN SAFE). 1 (THICK HEAVY VEST). " 1 (THE RED ROSE), 1 (TAKE BASKET) - 1 (SMASH, BREAK) 1 (SKELETON WARRIOR), 1 (RAISE 1 (POOL) 1 (LIFT HAND) 1 (LIE DOWN), 1 (JUMP), 1 (FOOD), 1 (FIEND). 1 (FASTEN HARNES) 1 (EXAMINE 1 (DUST). 1 (DROP BRACELET), 1 (DEATH) 1 (COUCH), 1 (CIRCUS TENT). 1 (CHARGER), 1 (BLIND SLUG), 1 (ASHES), 1 (095) 446-55-90 1 #7FFD 1 #5C00-#5C01 1 "Magic", 1 "FREDS WING 1 VALUE - 1 USE - 1 UP DEC H 1 TURN 1 TRANSPORT - 1 TRADE (T) - 1 ScaleScale inc Start Link Displac Rotation Rot. inc Cycles 1 STOP 1 STOP 1 STATUS (S) - 1 SKIP TIME - 1 SKILL - 1 SAVE DI 1 S - SELL PLAYER - 1 RANDOMIZE USR 15619: REM : LD HL,23755 1 PTS - 1 POS - 1 POKE 23607,(K1-6) 6 ; =USR 65394 1 POKE 23606,(K-K1*256): 5 ; DEF FN B(X,Y,N,O) 1 PICK UP (Z) - 1 P) PLAY NEXT MATCH - 1 O SUB 24: RUN 1 NAME - 1 MEDITATE (M) - 1 M - MOVE PLAYER - 1 LOOP_2 LD D,X- 1 LOOP_1 PUSH BC * * * 1 LOOK (L) - 1 LET K=ADR+SZ*N: 3 ; SPECIAL FOR INFORCOM 1 LET K1=INT(K/256): 4 ; 1 L4 LD A,(HL) 1 L4 LD A,(HL) 1 L3A97 JR L3B05 1 L1 LD A,D 1 L - 1 KIRUK - 1 K (l-n): POKE (l-n),0: LET k=k+1 1 J,K - 1 INVENTORY - 1 HOME - 1 HELLO - 1 HAVE YOU SEEN MY RENT BOOK - HANGE); 1 HAVE YOU SEEN MY GIRO - 1 GENERAL BILLS - 1 FEAA DEFB 0 OR #08 1 FE9E DEFB 0 1 FE95 AND #07 OR #08 1 FE8F LD A,(#FEAA) XOR C 1 FE8D INC A RET 1 EXAMINE - 1 EXAMINE (H) - 1 EEN 2-SAVE SPRITES "; INVERSE 1 EAT (E) - 1 DRINK (D) - 1 DOWN INC H 1 DOS PUSH IX ; 1 DIG (F) - 1 D ""CODE 16384 1 CALAH - 1 BREAK 1 ATTACK (SPACE) - 1 ASSUR - 1 <NN> 1 : NEXT n 1 90 SAVE a$CODE 4E4,6912 1 81 LD L,A 10 LD BC,#0004 1 80 BEEP 1,0: INPUT "Filename: 1 80 END 1 80 ADD A,D 9 LD HL,(#5C0B) 1 8,222,220,192,192,3,3,0,0,1,1,3, 1 79 RRCA 8 ENT $ 1 79 JP #3D2F 1 78 DOS PUSH IX 1 78 RRCA 7 ORG 65153 1 77 RRCA 6 ; =USR 65153 1 77 RET 1 76 OPER NOP FFDA: 0F 82 6F 3A FC FF 47 C5 :1A 1 76 M5 EI 1 76 AND #07 5 ; DEF FN L(X,Y,L,H,A,O) 1 75 NEXT q 33 RET 1 75 LOOP3 LD A,(IX) FFD2: C6 40 67 7B E6 07 0F 0F :C4 1 75 LD A,E 4 ; 1 75 EXX 1 74 PUSH HL FFCA: 3A FB FF 47 C5 7B E6 18 :82 1 74 POP HL 1122 (#0462), 1 74 LD H,A 3 ; SPECIAL FOR INFORCOM 1 73 LD B,8 FFC2: E9 E5 DD E1 ED 5B FD FF :91 1 73 LD (#5C00),HL 1 73 ADD A,#40 2 ; V. BODROV (C) 1995 1 72 LOOP2 PUSH BC FFBA: 23 CB 23 19 10 FD C1 10 :C1 1 72 LD (#5CFE),DE 1 72 DEFB #40,0 1 72 AND #18 1 ; SPRITE OUTPUT 1 1 71 LD B,A FFB2: 5F 3A FC FF 47 CB 23 CB :45 1 71 LD A,E 1 71 LD (#5D00),BC ( 1 71 DEFB #42,2,#41,1 1 70 LET attr=attr+32: NEXT j 32 EI 1 70 LD B,8 1 70 LD A,(DX) FFAA: 28 17 C5 16 00 3A FB FF :F7 1 70 EXX 1 70 DEFB #44,4,#43,3 4, 10, 30 1 69 PUSH BC 1 69 LD L,A FFA2: 32 E8 FF 2A F9 FF 04 05 :E5 1 69 JR NZ,M5 1 69 DEFB #46,6,#45,5 1 68 EXIT BIT 0,C 1 68 CLW RET 1 68 DEFB #47,#47,7 1 68 ADD A,D FF9A: 18 06 FE 03 20 05 3E A6 :C1 1 67 RRCA FF92: 18 0E FE 02 20 04 3E AE :C7 1 67 LD (HL),A 1 67 DJNZ L1 1 67 DEFB 6,#46,7,#47 1 660119, 1 66 DX DEFB 0 9 IF A$="1" THEN GO TO 6 1 66 RRCA FF8A: FF 7E FE 01 20 04 3E B6 :1D 1 66 RLCA FEF9: C9 00 00 00 00 00 00 00 :C0 1 66 LD A,(ATTR) 1 66 INC D 1366 (#0556), 1 66 DEFB 4,#44,5,#45 1 65 L5 LD E,0 1 65 DY DEFB 0 8 GO SUB 29: GO SUB 20 1 65 RRCA FF82: FF 09 7E 09 47 AF 32 E8 :20 1 65 RLCA FEF1: 23 23 10 F6 1C C1 10 D5 :FD 1 65 LD L,A 1 65 DEFB 2,#42,3,#43 1 64 TABL DEFB 0,#40,1,#41 1 64 ADDR DEFW 00000 7 LET O=0: LET DX=1: LET DY=1 1 64 JR EXIT 1 64 AND 7 FF7A: 01 08 00 09 5E ED 53 FD :26 1 64 AND #38 FEE9: FE 47 DD 7E 00 00 77 DD :DB 1 64 ADD A,D 1 63 M4 DJNZ L3 1 63 RRCA 1 63 RET O SUB 22 1 63 RET O SUB 22 1 63 RET 1 63 LD A,E FF72: 2A 0B 5C 01 04 00 09 56 :66 1 63 LD A,E FEE1: E6 38 07 07 82 6F 3A FD :33 1 62 RRCA 1 62 LD H,A FED9: 3F E6 18 C6 40 B1 67 7B :AD 1 62 LD H,A 1 62 LD (DE),A 1 62 LD (#5CFF),A 1 62 DJNZ LOOP1 6 OVER 1: LET X=0: LET Y=0: G 1 61 RRCA 1 61 POP BC 5 LET HMS=0: LET CADR=ADR 1 61 OR C FED1: 07 4F 7B CB 3F CB 3F CB :7F 1 61 LDIR 1 61 LD A,E 1 61 ADD A,#40 1 60 LD A,(DE) 7 LD BC,#0118 1 60 JR NZ,M4 1 60 INC E EN GO TO 4 1 60 AND #18 1 60 AND #07 1 60 ADD A,#40 FEC9: FE 3A FC FE 47 C5 7B E6 :66 1 59 LD BC,#20 1 59 DJNZ LOOP DR: IF ADR>64911 OR ADR<30000 TH 1 59 BIT 0,C 1 59 AND #18 FEC1: 3E A6 32 EE FE DD 2A FA :C2 1 58 LOOP1 PUSH BC 1 58 SRL A FEB9: 3E AE 18 06 FE 03 20 05 :E7 1 58 LD H,A 1 58 LD DE,TABL 1 58 JR NZ,L5 1 58 INC HL 4 INPUT "SPRITE ADDRESS ? ";A 1 57 INTAB LD HL,TABL+1 1 57 SRL A FEB1: 3E B6 18 0E FE 02 20 04 :ED 1 57 OR #58 1 57 LD B,A 1 57 INC IX L FOR ~ZX-REVIEW~" 1 57 BIT 4,E 1 56 SRL A FEA9: 32 EE FE 7E FE 01 20 04 :66 1 56 RRCA 1 56 RET 1 56 LD A,(DY) 1 56 LD (IX),A ) Vadim Bodrov, Ufa, 95"'"SPECIA 1 56 INC E 1 55,183,123,120,123,183,0,0,128,1 1 55 LOOP LD A,(HL) 5278: CLS : PRINT "SCAN 1/2"'"(C 1 55 RRCA 3. 1 55 LD DE,(COORDS) 65530 1 55 LD A,E FEA1: 23 7E 2B 32 FB FE 09 AF :4E 1 55 JR NZ,LOOP 1 55 INC H 1 54,0,0,199,69,239,239,128,0,0,0, 1 54 CONT DEC C 1 54 RRCA 1 54 POP IX 1 54 LD C,A FE99: 32 FC FE 09 7E 32 FA FE :74 1 54 LD B,A 3 DEF FN W(X,Y,L,H,C,I)=USR 6 1 53 PASS PUSH HL 1 53 LD E,A 1 53 LD A,(DX) OAD "win.BLK"CODE 1 53 JR LOOP 1 53 AND 7 FE91: 5F 09 7E 32 FD FE 09 7E :29 1 53 AND #18 RANDOMIZE FN W (X,Y,L,H,C,I). 1 52 PROC LD A,E 1 52 POKE3 SUB 4 1 52 OUT (#FE),A 1 52 LD L,A 12: RANDOMIZE USR 15619: REM : L 1 52 LD A,E FE89: 01 08 00 09 5E 3E BF 93 :87 1 52 DJNZ LOOP5 1 51 LOOP1 PUSH BC FE81: 2A 0B 5C 01 04 00 09 56 :74 1 51 ATTR DEFB 0 1 51 XOR A 80 SAVE a$CODE 4E4,6912 1 51 POP BC 1 51 LD A,E 6 1 51 ADD A,D 2 DEF FN N(X,Y,L,H,A)=USR 649 1 50 DY DEFB 0 "win.BLK" CODE 65276,116. 1 50 RLCA REM : LOAD "in12.PIX"CODE 1 50 RET C ";a$ 1 50 LD B,A 1 50 JR NC,CONT 1 50 DJNZ LOOP0 1 49 LOOP0 ADD HL,DE XOR 1 49 DX DEFB 0 1 49 RLCA LEAR 29999: RANDOMIZE USR 15619: 1 49 POP AF 1 49 LD A,(DY) 1 49 EI 70 BEEP 1,0: INPUT "Filename: 1 48 PASS3 LD IX,(ADDR) 1 48 SLA E 1 48 RET 1 48 LD E,A 1 48 CALL #05A9 T k=k+1: NEXT n 1 48 AND #38 1 BORDER 1: PAPER 7: INK 0: C 1 47 POKE2 ADD A,4 1 47 PASS LD (OPER),A RUM). 1 47 SLA E 1 47 LD DE,#0300 (22528+n): POKE (22528+n),7: LE 1 47 LD A,E 1 47 DJNZ LOOP1 1 46 SLA E 1 46 LD IX,#5800 60 FOR n=0 TO 767: POKE k,PEEK 1 46 LD H,A 1 46 LD A,E 1 46 LD A,#A6 (IBM) 1 46 INC E FF6E: 10 FC C1 C9 00 00 00 00 :03 1 45 ; 50 LET l=l+1792: NEXT h 1 45 RET 15 ATR LD E,0 1 45 PUSH AF 3 RANDOMIZE USR 5E4 1 45 POP BC FF66: 0F 0F 0F 82 6F AF 77 24 :CD 1 45 OR C 1 45 LD B,A 1 45 JR NZ,PASS3 1 44 PASS2 CP 3 1 44 POP DE FF5E: E6 18 C6 40 67 7B E6 07 :30 1 44 LD A,(DX) 1 44 JR Z,CONT ": NEXT F 1 44 JR NC,LP1 14 RET 1 44 DJNZ L1 40 LET l=l-2016: NEXT f 1 44 ADD A,#40 1 43 POKE1 CP 4 1 43 RRCA 13 JR C,START 1 43 LD E,A - 1 43 JR PASS 1 43 DJNZ LOOP2 FF56: 43 FF 77 C9 C5 06 08 7B :25 1 43 AND #18 1 43 ADD IX,DE 30 LET l=l+256: NEXT n 1 42 SRL A 1 42 RRCA 12 RRA 1 42 POP BC FF4E: E6 07 0F 0F 0F 82 6F 3A :92 1 42 LD DE,1792 m),0: LET k=k+1: NEXT m 1 42 LD A,C 2 FOR F=0 TO 5: PRINT AT F,0;" 1 42 LD A,(DY) =USR 65394. 1 42 LD A,#AE 1 41 SRL A 1 41 RRCA 11 IN A,(#FE) 1 41 LD D,0 1 41 JR NZ,PASS2 1 41 INC D FF46: 18 0F 0F 0F F6 58 67 7B :BA 1 41 DJNZ LOOP2 1 BORDER 0: PAPER 0: CLS 1 40 PASS1 CP 2 1 40 LOOP5 PUSH BC 1 40 GO TO 30 1 40 BUF DEFB 0 1 40 SRL A 1 40 INC HL 1 40 DJNZ LP4 10 LD A,#7F 1 40 CALL PROC FF3E: 10 ED C9 00 00 00 7B E6 :64 1 4) VIEW TRANSFER MARKET - 1 39 LP4 HALT 9 CALL INTAB 1 39 LOOP2 PUSH BC FF36: FF 14 C1 10 F8 D1 C1 1C :BF 1 39 RET 1 39 LD (HL),A 1 39 JR Z,PASS 1 39 JR PASS USR 65153. 1 38 NUM1 LD A,(IX+0) 1 38 PUSH DE FF2E: 3A 41 FF 47 D5 C5 CD 44 :99 1 38 LD B,PAUSE 8 CALL ATR 1 38 LD A,#B6 1 38 DJNZ DEL1 1 38 DEC B 1 37 NEXT INC IX 1 37 POP DE 7 LD BC,#0105 1 37 LD B,A FF26: 32 59 FF 3A 42 FF 47 C5 :36 1 37 LD (NUM1+2),A 1 37 JR NZ,PASS1 1 37 INC B 1 36 RETURN 1 36 PASS3 LD HL,(ADDR) 1 36 POP HL 6 LD HL,#5800 1 36 LD A,(DX) FF1E: FF 09 7E FE 00 28 04 AF :7C 1 36 LD (HL),00 1 36 CP 1 1 36 AND #1F 1 35 PASS0 LD (OPER),A 92 COORDS DEFW 00000 1 35 LOOP1 PUSH BC FF16: 7E 32 43 FF 3E C9 32 59 :99 1 35 IF A$=CHR$ 15 OR A$=CHR$ 9 1 35 RET 40 SBC HL,DE 1 35 POP HL 1 35 LD A,E C3D8: 03 42 02 41 01 40 00 00 :64 1 35 LD A,(HL) 1 35 JR NZ,LP2 5 LD IX,TABL 1 34 LOOP2 DEC E C3D0: 07 46 06 45 05 44 04 43 :BB 1 34 LET DX=DX+(A$="7" AND DX+X< 1 34 LEB PUSH IX 1 34 LD B,A FF0E: 41 FF 09 7E 32 42 FF 09 :50 1 34 LD A,#A6 91 DX DEFB 3 1 34 LD (OPER),A 191. 1 34 JR NZ,L4 39 AND A 1 34 BIT 6,H 4 HALT 1 33 RETURN 1 33 PASS LD A,(DY) FF06: 01 08 00 09 5E 09 7E 32 :2E 1 33 XOR A 1 33 RRCA 3 START EI 1 33 LD E,D 4 BUFF EQU 51000 1 33 LD B,#10 C3C8: 05 45 06 46 07 47 47 47 :FD 1 33 JR NZ,PASS3 90 DY DEFB 3 1 33 JR NEXT 1 33 DEC D 38 LD DE,10 1 32 PASS2 CP 3 89 ADDR DEFW 30000 1 32 IF A$=CHR$ 15 OR A$=CHR$ 9 1 32 SBC HL,DE 3 ENT $ 1 32 LD (CLW),A FEFE: 2A 0B 5C 01 04 00 09 56 :F1 1 32 JR NZ,L3 37 POP HL 1 32 DJNZ LP3 2 ENT $ 1 32 DJNZ LOOP1 C3C0: 01 41 02 42 03 43 04 44 :97 1 32 DEC (HL) 1 32 ADD HL,BC 1 31 LET X=X+(A$="7" AND X+DX-1< 1 31 XOR A 1 31 LD HL,BUF 1 31 LD E,A 2 ORG 50000 1 31 LD (ADDR+1),A 1 31 JR PASS0 88 RET 1 31 DEC DE 1 ORG 50000 1 31 CP 88 36 CALL L1 1 30 RANDOMIZE USR 25006 1 30 NN LD (HL),0 1 30 DRAW 0,1-DY: DRAW 1-DX*8,0: 1 30 LD A,H 35 PUSH HL 1 30 LD A,#AE 87 DJNZ LOOP1 1 30 JR Z,PASS 87 RET 1 30 DEC HL 1 30 DEC HL 1 30 ADC A,E 1 ; (C) SerzhSoft'95 1 3,239,255,254,0,199,69,239,239,1 1 3) VIEW OR SELL PLAYERS - 1 29 LET DY=DY+(DY=0): PLOT X*8, 1 29 RRCA 1 29 POP HL 1 29 LD A,(HL) 1 29 JR NZ,PASS2 86 POP BC 1 29 DJNZ L2 34 L5 PUSH BC 1 29 CP 0 86 POP BC 1 29 ADD HL,BC 1 28,128,0,0,0,1,0,0,1,1,1,1,0,204 1 28,128,0,0,0,0,128,128 1 28 PRINT '"MORE (Y/N) ? ": GO 1 28 PASS1 CP 2 85 INC E 1 28 RRCA 1 28 RLA 1 28 PUSH IX 1 28 LD A,(HL) 85 DJNZ LOOP3 1 28 INC HL 33 LD B,160 1 28 INC HL 1 27 INPUT "NAME OF SET SPRITES 1 27 RRCA 1 27 RR (HL) 32 PROG2 LD HL,1600 1 27 LD (ADDR),A 83 DX DEFB 0 1 27 JR Z,LEB 1 27 JR PASS0 84 DJNZ LOOP2 1 27 ADD HL,HL 1 27 ADD HL,BC 84 INC H 1 26 PRINT '"TOTAL NUMBER OF SPR 1 26 XOR A 31 ; 1 26 RLA 1 26 LD A,C 1 26 LD A,(HL) 82 DY DEFB 0 1 26 LD A,#B6 83 POP BC 1 26 LD (CLW),A 83 LOOP3 LD (HL),A 1 26 AND A 120 GO SUB 10 1 25,131,239,128,128,128,192,216,2 1 25 PRINT '"LENGHT OF SET SPRIT 1 25 DEL1 LD A,(BUF) $="" THEN GO TO 110 1 25 OUT (254),A 1 25 LD A,#C9 82 XOR A 1 25 JR NZ,PASS1 82 INC HL 1 25 INC HL 30 L10 DEFB 1 1 25 ADD HL,HL 1 25 ADD HL,BC 81 ADDR DEFW 00000 1 248,252,254,242,227,0,0,0,0,0,0, 1 24 PRINT '"MORE (Y/N) ? ": GO 1 24 CLS : PRINT "START SPRITE A 1 24 RL (HL) 29 L9 DEFB 0 1 24 OR BORDER 1 24 LD E,A 1 24 LD B,15 IZE USR 50000: PAUSE 1: IF INKEY 1 24 LD (DY),A 80 RET 1 24 CP 1 81 POP HL 1 23 RANDOMIZE FN W(0,0,32,24,11 1 23 L2 XOR A 28 RET 1 23 INPUT "NAME OF SET SPRITES 1 23 LD C,L 1 23 LD A,(HL) 80 DJNZ LOOP3 1 23 LD A,(HL) 79 DJNZ LOOP1 1 23 LD (BUF),A 110 RANDOMIZE USR 51006: RANDOM 1 23 AND 248 1 22,222,158,3,0,0,0,1,1,3,3,255,2 1 22 PRINT '"SIZE OF STANDARD SP 1 22 LD B,H 1 22 LD B,C 27 OUT (254),A 1 22 LD (OPER),A 79 INC H 1 22 LD (HL),A ( 1 22 AND 15 100 GO SUB 10 1 22 ADD HL,BC 78 POP BC 1 21 PRINT '"TOTAL NUMBER OF SPR 1 21 XOR A 78 INC IX 1 21 SBC A,E 1 21 OR (HL) 1 21 LD (DX),A 77 INC E 1 21 IN A,(C) 1 21 DJNZ L1 26 LD A,(L10) 1 20 RANDOMIZE USR 25000 1 20 PRINT '"LENGHT OF SET SPRIT 1 20 POKE k,PEEK (l+m): POKE (l+ 23 ; 1 20 LET m=1: FOR w=y TO y+dy-1: 1 20 SBC HL,BC 1 20 OUT (C),A 6;CHR$ (55+i); INK 0;" 1 20 LD B,A 77 LD (HL),A 1 20 LD A,(HL) 76 DJNZ LOOP 1 20 INC HL 25 JR NZ,L4 1 20 EX DE,HL * * * 1 2. "speak" - 1 2. LD HL,PROG 1 2) VIEW FIXTURES - 1 1: GO SUB 15: PAUSE 2: NEXT i: L 1 19 LET k=n*sz+adr: LET k1=INT 1 19 CLS : PRINT "START SPRITE A 2. 1 19 ANAL LD BC,65533 10 TO 12: PRINT INVERSE 1;AT i, 1 19 RLA 1 19 RL (HL) 24 OR L 1 19 AND (HL) 1 19 ADD HL,BC 75 INC HL 1 18 GO SUB 13: RETURN 1 18 FOR i=1 TO 10: LET n=0: GO 1 18 XOR A 23 LD A,H 1 18 RET 10 RANDOMIZE USR 51000: FOR i= 1 18 RET 1 18 LD E,A 74 INC IX 1 18 EX DE,HL 1 18 ADD HL,HL 1 17 STOP 1 17 LP3 LD C,A 1 17 INPUT "NAME OF SCREEN ? ";N 1 17 SUB E 73 LD (HL),A 1 17 RLA 1 17 JR C,L1 1 17 INC HL 22 L3 DJNZ L3 1 17 CALL ANAL DATA 0,119,119,119,119,119,119,0 1 16 LP2 LD B,TYPE 1 16 GO TO 14 1 16 BEEP .1,10: RETURN 1 16 RRC C 1 16 RR (HL) 21 LD B,1 1 16 LD B,3 41 POP BC 1 16 LD A,10 READ b: POKE a,b: NEXT a: RUN 1 16 LD A,#BF 72 OPER NOP 1 16 ADD HL,HL 1 15 L1 XOR A 20 L4 DEC HL 1 15 IF x>26 THEN GO SUB 18: ST CHARS 1 15 RLA 1 15 PUSH HL 1 15 POP DE 40 DJNZ L2 1 15 LD E,(HL) 71 LOOP LD A,(IX) 1 15 LD (NN+1),A 4 FOR a=USR "a" TO USR "a"+7: 1 15 DJNZ L3 1 144 DX DEFB 0 16 LD E,(HL) 1 143 DY DEFB 0 15 ADD HL,BC 1 142 ADDR DEFW 30000 14 LD BC,#0008 1 141 RET 13 LD D,(HL) 1 140 EI 12 ADD HL,BC 1 14 LP1 PUSH DE 1 14 LET n=2: GO SUB 19: BEEP .0 1 14 L3 LD B,C 19 OUT (254),A 1 14 L3 HALT 1 14 LD A,24 LOAD "mus"CODE 1 14 ADD HL,HL 1 14 ADD HL,BC 70 LD B,A 1 139 DJNZ LOOP4 11 LD BC,#0004 1 138 POP BC 10 LD HL,(#5C0B) 1 137 INC E 9 DI 1 136 POP DE 8 ENT $ 1 135 DJNZ LOOP6 7 ORG 64494 1 134 INC HL 6 ; =USR 64494 1 133 PASS5 INC IX 5 ; DEF FN I(X,Y,L,H,N) 1 132 LD (HL),A 4 ; 1 131 LD A,(IX) 3 ; SPECIAL FOR INFORCOM 1 130 JR NC,PASS5 2 ; V. BODROV (C) 1995 1 13 FOR I=1 TO 20: PLOT INK (R 1 13 RLA 1 13 LD IX,22919 3 RANDOMIZE USR 15619: REM : 1 13 LD HL,16384 18 LD A,(L9) 1 13 LD BC,#0008 69 LD A,(DX) 1 13 LD B,PAUSE 1 13 LD A,128 1 129 CP 24 1 ; SPRITE INPUT 3 1 128 LD A,E 1 12 L4 LD C,16 17 L1 HALT 1 12 BRIGHT 1: LET y=15: LET x=1 1 12 LD D,(HL) 68 LD L,A 1 12 JR NZ,L2 1 12 EX DE,HL ZX-Spectrum, 1 12 DEC D 39 ADD IX,DE 1 12 CALL ANAL REM : LOAD "SONG"CODE 1 12 ADD HL,HL 1 112 LD B,A FCAE: FB C9 30 75 00 00 00 00 :13 1 111 LD A,(DX) FCA6: 23 10 EC D1 1C C1 10 CF :4E 1 110 LD C,D FC9E: 30 04 7E DD 77 00 DD 23 :A0 1 11 LET n=5: LET y=18: OVER 1: 1 11 POP BC * * * 1 11 LDDR 1 11 LD E,A 1 11 LD D,8 16 RET 1 11 LD A,9 LEAR 49999: RANDOMIZE USR 15619: 1 11 EX AF,AF' 38 LD DE,32 1 11 BIT 3,H 1 11 ADD HL,BC 67 ADD A,D 1 109 LD L,A FC96: 0C FE 20 30 09 7B FE 18 :86 1 108 ADD A,D FC8E: 82 6F 4A 3A B3 FC 47 79 :6E 1 107 RRCA FC86: 58 67 7B E6 07 0F 0F 0F :D6 1 106 RRCA FC7E: D5 7B E6 18 0F 0F 0F F6 :EB 1 105 RRCA FC76: 10 CB D1 3A B2 FC 47 C5 :12 1 104 AND #07 FC6E: EC E1 24 C1 10 E0 C1 1C :E9 1 103 LD A,E FC66: 7E DD 77 00 23 DD 23 10 :67 1 102 LD H,A FC5E: 20 30 09 7B FE 18 30 04 :78 1 101 OR #58 FC56: 4A 3A B3 FC 47 79 0C FE :4F 1 100 RRCA FC4E: 0F 0F 82 6F 06 08 C5 E5 :11 1 10 POKE 26084,N : REM 1 10 LET n=2: GO SUB 15: BEEP .0 20 LD A,(HL) 1 10 INK 6: BRIGHT 0: PAPER 0: B 1 10 FOR h=1 TO 3: FOR f=1 TO 8: 21 LD DE,24 1 10 ; 15 OUT (254),A 1 10 LD C,L 1 10 LD BC,768 1 10 LD (NN+1),A 2 BORDER 0: PAPER 0: INK 7: C 1 10 INC D 37 POP BC 1 10 DEC HL 1 10 ADD HL,DE 1 1. DI 1 1,3,99,243,247,119,7,7,147,17,85 1 1) VIEW LEAGUE TABLE - 1 1 2 3 4 5 6 1 - 440 1 ,0,0,0 1 ********************************* 1 $: CLS : RANDOMIZE USR 15619: RE 1 n=0: GO SUB 15: PAUSE 2: LET n= 1 99 RRCA FC46: 18 C6 40 67 7B E6 07 0F :3E 1 98 RRCA FC3E: D5 3A B2 FC 47 C5 7B E6 :64 1 97 AND #18 FC36: B2 FC DD 77 00 DD 23 D1 :05 1 96 LD A,E FC2E: B3 FC DD 77 00 DD 23 3A :67 1 95 PUSH DE FC26: 23 E5 D1 DD 19 10 E5 3A :20 1 94 LOOP4 PUSH BC FC1E: 30 11 09 00 CD A9 30 23 :2D 1 93 LD B,A FC16: 00 26 00 DD 6E 01 CD A9 :FA 1 92 LD A,(DY) FC0E: 04 05 28 1B 16 00 DD 5E :A7 1 91 ATTR POP DE FC06: FC 09 7E 47 DD 2A B0 FC :7F 1 90 DJNZ LOOP1 FBFE: 7E 32 B3 FC 09 7E 32 B2 :C3 1 9 LET DX=3: LET DY=3: LET SZ= 1 9 FOR I=1 TO 20: PLOT INK (R 17 LD A,(HL) 1 9 LDIR 14 AND 7 1 9 LD DE,23295 1 9 LD DE,10 IZE USR 50000: GO TO 10 1 9 LD B,H JR BEGIN 1 9 LD A,16 1 GO TO 100 1 9 LD (HL),A 1 9 DI 36 POP IX 1 89 INC E FBF6: 56 01 08 00 09 5E D5 09 :95 1 88 POP BC FBEE: F3 2A 0B 5C 01 04 00 09 :7B 1 87 DJNZ LOOP2 1 86 POP BC 1 85 INC H 1 84 POP HL 1 83 DJNZ LOOP3 1 82 INC IX 1 81 PASS4 INC HL 1 80 LD (IX),A 1 8 SHOWER LD HL,BUFF+6911 1 8 RESTORE : FOR i=30006 TO 30 1 8 BRIGHT 1: LET y=15: LET x=1 14 ADD HL,BC 1 8 SCF 35 DJNZ L3 1 8 POP HL 10 RANDOMIZE USR 50049: RANDOM 1 8 LD IX,22887 1 8 LD BC,#02FF 13 LD A,(L9) 1 8 AND C 1 8 ADC A,D JR NZ,LOOP 1 79 LD A,(HL) 1 78 JR NC,PASS4 1 77 CP 24 133 DX DEFB 0 1 76 LD A,E 132 DY DEFB 0 1 75 JR NC,PASS4 131 ADDR DEFW 30000 1 74 CP 32 130 RET 1 73 INC C 129 EI 1 72 LOOP3 LD A,C 128 DJNZ LOOP4 1 71 RRCA 127 JR NC,PASS5 1 71 LD B,A 127 POP BC 1 70 LD A,(DX) 126 INC E 1 70 AND 7 126 CP 32 1 7 LET n=5: LET y=18: LET o=2: 11 ADD HL,BC 1 7 DATA 0,2,7,71,215,255,191,1 1 7 BORDER EQU 0 1 7 LD (HL),7 12 DJNZ L2 1 7 DEC A 34 ADD IX,DE 1 7 CALL L1 1 7 CALL ANAL 1 7 ADD HL,DE CP #58 1 69 LD C,D 125 POP DE 1 69 LD A,E 125 INC C 1 68 PUSH HL 124 DJNZ LOOP6 1 68 LD H,A 124 LOOP6 LD A,C 1 67 LOOP2 PUSH BC 123 INC HL 1 67 ADD A,#40 123 LD B,A 1 66 LD B,8 122 PASS5 INC IX 1 66 AND #18 122 LD A,(DX) 1 65 LD L,A 121 LD (IX),A 1 65 LD A,E 121 LD C,D 1 64 LOOP1 PUSH BC 120 LD L,A 1 64 ADD A,D 120 LD A,(HL) 1 63 RRCA 119 JR NC,PASS5 1 63 LD B,A 119 ADD A,D 1 62 RRCA 118 CP 24 1 62 LD A,(DY) 118 RRCA 1 61 RRCA 117 LD A,E 1 61 PUSH DE 117 RRCA 1 60 PIXELS POP DE 116 RRCA 1 60 AND 7 116 JR NC,PASS5 1 6 PAUSE EQU 3 1 6 L1 LD HL,23552 1 6 L1 LD HL,23295 1 6 INK 6: BRIGHT 0: PAPER 0: B 7 ORG 65278 1 6 DATA 0,0,0,0,1,3,3,7,0,0,0, 1 6 XOR A LD A,H 1 6 SUB A 33 LD DE,224 1 6 PUSH HL 1 6 LD A,8 1 59 LD A,E 115 CP 32 1 59 INC IX 115 AND #07 1 58 LD H,A 114 INC C 1 58 LD (DY),A 114 LD A,E 1 57 LD A,(IX) 113 LD H,A 1 57 ADD A,#40 113 LOOP6 LD A,C 1 56 INC IX 112 OR #58 1 55 LD (DX),A 111 RRCA 1 54 PASS LD A,(IX) 110 RRCA 1 53 DJNZ LOOP5 109 RRCA 1 52 ADD IX,DE 108 AND #18 1 51 POP DE 107 LD A,E 1 50 PUSH HL 106 PUSH DE 1 5 TYPE EQU 24 1 5 LET l=16384: LET k=4E4: LOA 19 CALL K2 1 5 LET DX=3: LET DY=3: POKE 65 3 ; SPECIAL FOR INFORCOM 1 5 L2 PUSH BC 1 5 CLRSCR LD C,127 1 5 LD DE,32 32 K1 POP BC 1 5 LD DE,1 RET NZ 1 5 LD (NN+1),A 1 49 INC HL 105 LOOP4 PUSH BC 1 48 INC HL 104 LD B,A 1 47 LD A,(HL) 103 ADDR DEFW 0000 1 47 CALL #30A9 103 LD A,(DY) 1 46 LOOP2 PUSH BC 102 DEFB 1 1 46 LD DE,9 102 ATTR POP DE 1 45 PUSH DE 101 DEFB 2 1 45 CALL #30A9 101 DJNZ LOOP1 1 44 LOOP PUSH BC 100 DEFB 4 1 44 LD L,(IX+1) 100 INC E 1 43 LD IX,BYTE 99 DEFB 8 1 43 LD H,0 99 POP BC 1 42 DXY LD BC,0000 98 DEFB 16 1 42 LD E,(IX) 98 DJNZ LOOP2 1 41 PASS3 LD HL,(ADDR) 97 DEFB 32 1 41 LOOP5 LD D,0 97 POP BC 1 40 PASS2 LD (OPER),A 96 DEFB 64 1 40 JR Z,PASS 96 INC H 1 4 RND_2 LD HL,(SEED) BIT 5,(IY+1) 1 4 RANDOMIZE USR 15619: REM : 1 ; WINDOW ATTR 1 4 PUSH IX 31 CALL #05A9 1 4 LD B,160 C398: E6 07 D3 FE C9 00 00 00 :E2 1 4 LD A,32 1 4 ENT $ 1 39 LD A,#A6 95 BYTE DEFB 128 1 39 DEC B 95 POP HL 1 38 JR NZ,PASS3 94 RET 1 38 INC B 94 DJNZ LOOP3 1 37 PASS3 LD IX,(ADDR) 93 INC IX 1 37 PASS CP 2 93 JR NZ,LOOP 1 36 PASS0 LD (OPER),A 92 PASS4 INC HL 1 36 JR PASS2 92 DEC C 1 35 LD A,#AE 91 DEC E 1 35 LD A,#A6 91 LD (HL),A 1 34 JR NZ,PASS3 90 OPER NOP 1 34 JR NZ,PASS 90 POP BC 1 33 PASS2 CP 3 89 LD A,(IX) 1 33 CP 1 89 POP DE 1 32 LD A,(HL) 88 DJNZ LOOP2 1 32 JR PASS0 88 JR NC,PASS4 1 310070, 1 31 LD A,#AE 87 CP 24 1 31 LD (OPER),A 87 POP BC 1 30 LD A,#B6 86 INC HL 1 30 JR NZ,PASS2 86 LD A,E 1 3 PROG1 LD HL,1 C390: ED 52 C1 10 F1 3A 80 C3 :D1 1 3 LOOP LD IX,#4000 30 LD DE,32 1 3 CLEAR 29999: RANDOMIZE USR 1 3 ORG 50000 1 3 LD IX,22855 1 3 ENT $ INC HL 1 29 PASS1 CP 2 85 JR NC,PASS4 1 29 ADD HL,BC 85 POP HL 1 28 LD (ADDR+1),A 84 DJNZ LOOP1 1 28 JR PASS0 84 CP 32 1 27 LD A,#B6 83 INC C 1 27 DEC HL 83 PASS1 INC D 1 26 LD A,(HL) 82 POP DE 1 26 JR NZ,PASS1 82 LOOP3 LD A,C 1 25 INC HL 81 CONT POP AF 1 25 CP 1 81 LD B,A 1 24 LD A,(HL) 80 LD A,(DX) 1 24 LD (ADDR),A 80 LD (HL),A 1 23 LD A,(HL) 79 OPER NOP 1 23 LD (OPER),A 79 LD C,D 1 22 XOR A 78 PUSH HL 1 22 ADD HL,BC 78 LIXA LD A,(IX+0) 1 21 LD B,A 77 LOOP2 PUSH BC 1 21 LD (DXY+1),A 77 LD H,A 1 20 LD A,(HL) 76 ADD A,#40 1 20 ADD HL,BC 76 LD B,8 1 2 PAUSE EQU 5 1 2 DEF FN b(X,Y,N,O)=USR 65394 1 2 ORG 50000 LD (HL),A 1 2 ENT $ C388: CD 6A C3 E1 11 0A 00 A7 :E8 1 2 ENT $ 29 L3 PUSH BC 1 2 ENT $ 1 19 LD A,(HL) 75 LD L,A 1 19 ADD HL,BC 75 XOR C 1 18 LD (DXY+2),A 74 AND #F8 1 18 ADD HL,BC 74 ADD A,D 1 17 PUSH DE 73 RRCA 1 17 LD A,(HL) 73 XOR C 1 16 LD E,(HL) 72 RRCA 1 16 ADD HL,BC 72 AND #18 1 15 LD E,(HL) 71 RRCA 1 14 ADD HL,BC 70 RRCA 1 13 LD BC,#0008 69 RRCA 1 12 LD D,(HL) 68 LD A,C 1 11 ADD HL,BC 67 LD L,A 1 10 LD BC,#0004 66 ADD A,D 1 1 REM EXAMPLE 2 1 1 ; (C) SerzhSoft'95 1 1 ; ( 1 1 ORG 50000 C380: 01 21 40 06 06 A0 C5 E5 :FB 1 1 ORG 50000 28 LD B,8 1 1 ORG 50000 1 0 REM KOMAPOB'95*RIPPER 1/1 18 LD B,8 1 (ASH C.S.C.), 1 'CLOSE' 1 s - 1 r - 1 X) RESIGN AS HEAD COACH; 1 X) RESIGN AS HEAD COACH - 1 T) CHECK TEAM STATISTICS - 1 P.SIM PUSH HL 1 P) PLAY NEXT MATCH; 1 OUT CODE " CLEAR " ... 1 O) MORE... - 1 L2 RLCA 1 L2 LD IX,#2F4D 1 DROP (X) - 1 DOS PUSH IX 1 BUY (G) - 1 9 LD HL,(#5C0B) 65 SRL D 1 89 1 8 ENT $ 64 SRL D 1 7 ORG 65005 63 SRL D 1 6 ; =USR 65005 62 RLCA 1 50 LD IX,#3F0A 1 5 ; DEF FN M(X,Y,L,H,A,O) 61 RLCA 1 48 BIT 0,C 1 47 LD IX,#2F1B 1 42 LD (#5CFF),A 1 41 LD A,E 1 40 JR NZ,M2 1 4 ; 60 AND #38 1 39 L3 BIT 0,C 1 38 LD C,A 1 31 POKE 39005,0: POKE 39009,5: 1 31 LD C,A 1 30 FOR n=0 TO 767: POKE k,PEEK 1 3 ; SPECIAL FOR INFORCOM 59 LD C,A 1 27 AND #1F 1 22 INPUT "NAME OF SCREEN ? ";N 1 22 JR K1 1 21 BEEP .001,60: RETURN 1 2. On the clock, between the 1 2 ; V. BODROV (C) 1995 58 SUB E 1 19 RETURN 1 18 PRINT #1;AT 0,0;"1-LOAD SCR 1 17 GO TO 8 1 16 PUSH HL 1 16 LD (COORDS),DE 1 15 LD E,(HL) 1 15 EXX 1 14 LET O=0: FOR i=1 TO 10: LET 1 13 DRIVER BIT 0,C 1 13 LD BC,#0008 1 11 ORG 50000 1 10 FOR n=0 TO 6143: POKE k,PEE 1 10 ; 1 10 LD BC,#0004 1 1 ; SPRITE OUTPUT 2 57 LD A,#BF 1 -1": 1 SLA (HL) (4 1 RL (HL) 30 1 LD IX,#3FD5 ; 1 LD IX,#2F1B 23 M1 DI 1 LD HL,50000 ; 1 LD C,2 ; 1 LD A,224 ; 1 END 1 CALL D0S ; 1 BEGIN <NN> 1 80 DEFW #4808,#4818 (attr+c),7: LET n=n+1: NEXT c 1 8 ; C = 5 - 1 8 ENT $ 1 79 ADDR DEFW #4010 65 POKE n,PEEK (attr+c): POKE 1 78 ; 60 FOR j=0 TO 7: FOR c=0 TO 7 1 77 RET dr1: NEXT k 1 76 DJNZ L3 55 LET adr1=adr1+32: LET adr=a 1 75 K1 ADD IX,DE 50 LET adr=adr+256: NEXT a 1 74 POP BC adr+s),0: LET n=n+1: NEXT s 1 73 POP DE 45 POKE n,PEEK (adr+s): POKE ( 1 72 CALL #05A9 FOR s=0 TO 7 1 71 LD DE,8 40 FOR k=0 TO 7: FOR a=0 TO 7: 1 70 PUSH DE 30 LET adr1=adr 1 69 L3 PUSH BC AD attr 1 68 ONE LD B,8 20 FOR q=1 TO 12: READ adr: RE 1 67 ; 15 LET n=4E4 1 66 RET 10 LOAD ""CODE 16384 1 65 DJNZ L2 0 REM KOMAPOB'95*RIPPER 1/12 1 64 ADD IX,DE 1 63 K2 LD DE,32 1 62 POP BC 1 61 POP IX 1 60 CALL ONE 1 6 ; =USR 64912 1 59 LD DE,248 1 58 PUSH IX 1 57 L2 PUSH BC 1 56 DATA LD B,8 1 55 ; 1 55 LD A,E 1 54 LOOP1 PUSH BC 1 54 RET 1 53 LD B,A 1 53 EI 1 52 LD A,(DY) 1 52 DJNZ L1 1 51 POP BC 1 51 JR NC,PASS1 1 50 POP DE 1 5 DATA 0,0,0,0,1,3,3,7,0,0,0, 1 5 ; DEF FN N(X,Y,L,H,A) 1 49 CALL ONE C3E0: 10 48 08 50 18 50 00 00 :BB 1 48 LD DE,24 C3D8: 10 50 08 40 18 40 00 48 :E3 1 48 LD B,8 1 47 LD H,A C3D0: 10 40 08 48 18 48 00 50 :E3 1 47 LD A,(DY) 1 46 DEFB #DD C3C8: 05 D1 C1 DD 19 10 F2 C9 :E3 1 45 OR #58 C3C0: 08 C5 D5 11 08 00 CD A9 :B4 1 44 AND #03 C3B8: 20 00 DD 19 10 ED C9 06 :5D 1 43 RRCA C3B0: 00 CD BF C3 DD E1 C1 11 :52 1 42 RRCA C3A8: C9 06 08 C5 DD E5 11 F8 :D2 1 41 RRCA C3A0: CD BF C3 D1 C1 10 DA FB :29 1 40 LD A,H C398: 03 F6 58 DD 67 11 18 00 :19 1 4 ; 1 39 DEFB #DD C390: DD E1 DD 7C 0F 0F 0F E6 :7D 1 38 POP IX C388: 67 13 D5 DD E5 CD A9 C3 :95 1 37 CALL DATA C380: C3 C5 1A DD 6F 13 1A DD :3B 1 36 PUSH IX C378: 00 CD BF C3 06 0B 11 D0 :7C 1 35 PUSH DE C370: B7 C3 DD 21 00 58 11 18 :2C 1 34 INC DE C368: CD CB C3 DD E1 06 08 CD :1F 1 33 LD H,A C360: CD 6A 05 06 08 11 F8 00 :76 1 32 DEFB #DD C358: 00 3E FF 37 F3 14 08 15 :B3 1 31 LD A,(DE) C350: DD 21 00 40 DD E5 11 08 :2C 1 31 JR NZ,L2 INC A 1 30 INC DE 1 30 CP #57 FE8F LD A,(#FE9E) 1 3 DATA 0,0,0,0,0,0,0,1,0,0,0, 1 29 LD L,A 1 29 LD A,H 1 28 DEFB #DD " 1 28 DEFB #DD 1 27 LD A,(DE) 84 DEFW #5008,#5018 1 27 DEC IX 1 26 L1 PUSH BC 83 DEFW #4800,#4810 1 26 DEC IX 1 25 LD DE,ADDR 82 DEFW #4008,#4018 1 25 CALL #05A9 1 24 L2 LD E,#01 2. 1 24 LD B,11 81 DEFW #5000,#5010 1 23 ATTR LD IX,#5AFF 1 22 ; FE9A RET 1 21 JR L1 FE99 SCF 1 20 CALL #05A9 FE97 OUT (#FE),A 1 2 ; V. BODROV (C) 1995 1 19 LD E,#01 FE95 OR #08 1 18 JR Z,ATTR FE93 AND #07 1 17 CP #3F FE92 RLCA 1 16 LD A,H FE91 RLA 1 15 DEFB #DD FE90 RLCA 1 14 DEC IX FE8F LD A,R 1 13 L1 DEC IX 1 13 LD D,(HL) 1 12 ; (by MAC & SLA). 1 12 ADD HL,BC 1 11 LD BC,#0004 1 11 CALL #056A 1 10 DEC D 1. 1 1 REM EXAMPLE 1 1 ; SPRITE INPUT 1/2 1 0 REM KOMAPOB'95*RIPPER 1/-1 1 .... ;<--- 1 -5": 1 SETINT LD A,7 ; 1 Russia, Moskow, 12.10.95. 1 RET ; 1 RANDOMIZE USR 15619: REM : 1 PRINTQ SCF ; 1 PRINT LD BC,#FFFD ; 1 LD D,A ; 1 LD A,31 ; 1 JP #3D2F ; TR-DOS. 1 DJNZ LOOP ; 1 BUSY CALL #1F54 ; 1 ; (C) ROBOTSOFT'95 GENS 4-51. 1 9 EX AF,AF' 1 8 INC D 1 7 DI BARBARIAN' 1 6 SCF 1 6 1 5 LD A,#FF 1 4 LD DE,#0001 1 3 ; SPECIAL FOR INFORCOM 1 3 LD IX,#57FF 1 21. 1 20. 1 2 ENT $ 40 SAVE a$CODE 4E4,6912 1 19. IS DOS. 1 18. IS DOS. 1 17. 1 16 1 15. ZX 1 14. 1 13. TR DOS 1 11,12. ZX FORUM-1, ZX FORUM-2. ( 1 10. 1 1 ORG 50000 ";a$ 1 || 1 What his name? 1 New turbo algoritms..90% 1 New turbo algoritms..10% 1 INFORMATION FOR BRAKERS 1 Arrange the letters 1 A>RUN "MASM128K" <Enter> 1 9.CREDITS & COMING SOON: 1 9. 30 1 8. 1 8. 1 7. 1 7. 1 6. 1 2,3,4,5. 1 2 1 15 LD DE,248 1 14 LD B,8 1 10 EX AF,AF' 1 1. 1 1 RANDOMIZE USR 23872 1 /\ 1 ----------------------- 1 XOR #20 1 SCF FE8F LD A,R 1 SCF SCF 1 RET RET 1 RET AND #07 1 PUSH BC NEG 1 PROG RET 1 POP BC 1 OUT (#FE),A SCF 1 OUT (#FE),A OUT (#FE),A 1 OUT (#FE),A 1 OR #08 OUT (#FE),A 1 OR #08 OR #08 1 OR #08 1 M1 JR M1 1 LD B,#07 AND #07 1 LD A,#00 5. 1 LD (#FEAA),A 1 LD (#FE9E),A AND #07 1 L1 JR L1 1 INC A RET 1 DJNZ #FE95 1 AND #27 * * * 1 AND #01 LD C,A 1 9 INC D 1 87 1 85 1 8 DI 1 7 SCF 1 5 LD DE,8 1 4 PUSH IX 1 3. 1 2 ENT $ 1 10 1 1 ORG 50000 1 " 1 XOR A * * * 1 SUB 8 1 SUB 32 ADD HL,HL (3 1 RET C 1 RET - 1 RANDOMIZE USR 23600 1 NOP 1 LD L,A EX DE,HL 19 1 LD L,A 1 LD IX,#2F65 1 LD HL,(#5D00) 1 LD HL,(#5CFE) 1 LD HL,(#5C00) 1 LD H,A 1 LD B,8 1 LD A,L SLA C (4 1 LD A,L EX DE,HL 1 LD (L4+1),HL 1 LD (DE).A N2, 1 LD (DE).A 1 LD (#5C00),A 1 INC HL 1 INC D 1 DJNZ L4 1 DELAY :26084 1 CP 7 1 CALL DOS 1 AND A 1 ADD A,32 RL B 16 1 33 RET 1 32 POP HL 1 30 DEFB #31 1 *AIG* & KSA SOFTWARE 1 * * * 1 * * * 1 * * * 1 Z 1 XOR #07 1 RLA 1 PUSH HL 1 PUSH DE 1 POP HL INC E 1 PLAY :25006 1 OUT (#FE),A 1 OR A RET 1 LD E,Y- 1 LD C,D 1 LD C,8 LD A,B 1 LD B,E 1 LD B,8 1 LD A,(HL) JR NZ,LOOP_2 1 JR NC,PASS 1 INIT :25000 1 84 1 38 1 36 1 1. O 1 1. 1 *AIG* productions: 1 RET 1 PUSH BC 1 POP DE 1 POP BC 1 LD L,A 1 LD H.#0F 1 LD A,H 1 LD A,E 1 LD A,#2C 1 LD (#5CFE),HL 1 JR Z,L5 1 JR NC,L2 1 JP #3D2F 1 INC E 1 INC D 1 DJNZ L3 1 BIT 4,E 1 ADD HL,HL 1 15 1 ... 1 "printer.pcx" 1 "mouse.pcx" 1 "kirill3.pcx" 1 "kirill2.pcx" 1 "kirill1.pcx" 1 "art1.pcx" 1 LD SP,767 ( 1 CALL #22E5 1 SCF ; 1 RET ; 1 OUT (C),A ; 1 ORG #5B00 ; 1 NOP ; 1 LD D,A ; 1 LD BC,#FFFD ; 1 LD BC,#FFFD ; 1 LD BC,#BFFD ; 1 LD A,D ; 1 LD A,7 ; 1 LD A,191 ; 1 LD A,#FF ; 1 LD A,#0F ; 1 LD A,#0E ; 1 JR Z,PRINTQ ; 1 JR SETINT ; 1 JR PRINT ; 1 JR NZ,BUSY ; 1 JR NC,PRINTQ ; 1 IN A,(C) ; 1 COPYRIGHT BY 1 CCF ; 1 CALL SETINT ; 1 BIT 1,A ; 1 BIT 0,A ; 1 6. 1 5. 1 LD I,A 1 LD A,127 1 LD (32767),HL 1 IM 2 1 EI 1 DI 1 4. 9 DI 1 1. 1 CREDITS: 1 4. 1 (Mastertronic) 1 9 1 ; 1 ; 1 121019, 1 SPECTRUM 1 * * * 1 ; 1 02.txt 1 01.txt 1 - 96 - 1 - 94 - 1 - 92 - 1 - 91 - 1 - 90 - 1 - 89 - 1 - 88 - 1 - 87 - 1 - 86 - 1 - 85 - 1 - 84 - 1 - 83 - 1 - 82 - 1 - 81 - 1 - 80 - 1 - 79 - 1 - 78 - 1 - 77 - 1 - 76 - 1 - 75 - 1 - 74 - 1 - 73 - 1 - 72 - 1 - 71 - 1 - 70 - 1 - 69 - 1 - 68 - 1 - 67 - 1 - 66 - 1 - 65 - 1 - 64 - 1 - 63 - 1 - 62 - 1 - 61 - 1 - 60 - 1 - 59 - 1 - 58 - 1 - 57 - 1 - 56 - 1 - 55 - 1 - 54 - 1 - 53 - 1 - 52 - 1 - 51 - 1 - 50 - 1 - 49 - 1 - 48 - 1 - 47 - 1 - 46 - 1 - 45 - 1 - 44 - 1 - 43 - 1 - 42 - 1 - 41 - 1 - 40 - 1 - 39 - 1 - 38 - 1 - 37 - 1 - 36 - 1 - 35 - 1 - 34 - 1 - 33 - 1 - 32 - 1 - 31 - 1 - 30 - 1 - 29 - 1 - 28 - 1 - 27 - 1 - 26 - 1 - 25 - 1 - 24 - 1 - 23 - 1 - 22 - 1 - 21 - 1 - 20 - 1 - 19 - 1 - 18 - 1 - 17 - 1 - 16 - 1 - 15 - 1 - 14 - 1 - 13 - 1 - 12 - 1 - 11 - 1 - 10 - 1 - 9 - 1 - 8 - 1 - 7 - 1 - 6 - 1 - 5 - 1 - 4 - 1 - 3 - 1 - 2 - 1 TR-DOS 1 STRICKES BACK, ACADEMY, MONTECAR- 1 RST#18 1 RST#10 1 ROPE) 1 OFFICE 1 OF EIGHT) - 1 NUTS"; 1 LO CASINO 1 HEALING). 1 C388: 0F 3A A4 C3 A7 28 0B DD :B2 1 C380: E8 E1 C9 00 00 00 00 00 :D5 1 C380: 7C FE 57 20 F1 FB C9 00 :E9 1 C378: F7 3A 80 C3 D3 FE C9 00 :49 1 C370: 3E 18 32 93 C3 3E 0A CD :26 1 C358: FF 02 ED B0 21 38 C7 11 :EA 1 23552 = #5C00 = 01011 1 22528 = #5800 = 01011 1 127, 1 ********************************* 1 (CHUNG Software) 1 ( 1 "Check disk". 1 " 1 ;" DY=";DY'"ADDRESS:";CADR,"SIZ 1 (F.O.R.C.E. Ltd), 1 SUB 15: STOP 1 T.V.POOLS - 1 JP #19E8 1 FE8F LD A,(IX+3) 1 D) DISMISS TALENT SCOUT - 1 43 LD A,(L10) 1 41 POP BC 1 4. 1 4) LOAD DATA; 1 37 RET 1 36 LD A,E 1 35 BEEP 1,0: INPUT "Filename: 1 3) VIEW OR SELL PLAYERS; 1 27 PUSH IX 1 26 LD A,E 1 24 LD IX,#2F65 1 22 LD (#5C00),A 1 2. 1 18 INC A 1 16 IF A$="2" AND HMS>0 THEN G 1 16 LD A,C 1 16 LD A,#BF 1 10 GO SUB 29 1 1) VIEW LEAGUE TABLE; 1 9 INC DE 1 7 ORG 65394 1 56 LD (LIXA+2),A 1 46 INC IX 1 3 ; 1 2 ; V. BODROV (C) 1995 1 17 PUSH DE 1 10 LD HL,(#5C0B) 1 1 ; (C) ALANSOFT'95 1 INC HL ; 1 CPL ; 1 8 ENT $ 1 17 POP IX 1 12 CALL #056A 1 SCF 1 OUT (#FE),A 1 LD A,(SEED) 1 PUSH DE 1 LD A,#3C 1 JR C,L2 1 JR C,L1 1 * * * 1 PUSH AF 1 DEC C 1 1 1 1 1